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PREFACE 


This publication is oriented to the F level 
assembler program (the assembler) function- 
ing in the IBM System/360 Operating System 
|(Primary Control Program, MFT, and MVT). 

This publication is divided into an 
introduction and four sections which de- 
scribe the following: 


1. Assembler options and data set re- 
quirements. 

2. Use of IBM-provided cataloged procedures 
for assembling; assembling and linkage 
editing; assembling, linkage editing, 
and executing assembler language source 
programs. 

3. Use and interpretation of the assembler 
listing. 

4. Programming considerations. 


In addition, the appendixes provide a list 
and explanation of diagnostic messages, a 
description of object output cards, and a 
sample program listing. 

Other System Reference Library publica- 
tions in the IBM System/360 Operating 
System series provide fuller, more detailed 
discussions of the topics introduced in this 
publication: a careful reading of the 


publication IBM System/360 Operating 
System: Concepts and Facilities, Form 


C28-6535, is recommended. Knowledge of 
the assembler language is assumed. Where 
appropriate, the reader is directed to the 
following publications: 


IBM System/360 Operating System: 
Control Language (Form C28-6539) 


IBM System/360 Operating System: Storage 
Estimates (Form C28-6551) 


Job 


Third Edition 


IBM System/360 Operating System: Linkage 
Editor (Form C28-6538) 


IBM System/360 Operating System: 


Supervisor and Data Management Services 
(Form C28-6646) 


IBM System/360 Operating System: 


Supervisor and Data Management Macro- 
Instructions (Form C28-6647) 


IBM System/360 Operating System: TESTRAN 
(Form C28-6648) 


IBM System/360 Operating System: 


Messages, Completion Codes, and Storage 
Dumps (Form C28-6631) 


IBM System/360 Operating System: 
Assembler Language (Form C28-6514) 


IBM System/360 Operating System: 


Utilities (Form C28-6586) 


IBM System/360 Operating System: FORTRAN 


IV (E), Library Subprograms (Form 
C28-6596) 


IBM System/360 Operating System: System 
Programmer's Guide (Form C28-6550) 


IBM System/360 Operating System: FORTRAN 
IV _(E) Programmer's Guide (Form C28-6603) 
IBM System/360 Operating System: COBOL 
{E) Programmer's Guide (Form C24-5029) 
References to these publications are 


usually by a short title, e.g., Linkage 
JEditor or Data Management Services. 


This is a major revision of, and obsoletes, C26-3756-1. Changes are designated as follows: 


1. A vertical line appears to the left of affected text where only a part of the page has been changed. 


2. A dot (e) appears to the left of the page number of a page that has been changed throughout. 


3. A dot appears to the left of the title of a changed illustration. 


The major changes in this publication are concerned with the inclusion of the cataloged procedures 
necessary to support the MVT Control Program (Option 4) of the Operating System. 


Specifications contained herein are subject to change from time to time. Any such changes will be 


reported in subsequent revisions or Technical Newsletters. 


Requests for copies of IBM publications should be made to your IBM representative or to the IBM 


branch office serving your locality. 


Address comments conceming the contents of the publication to IBM Corporation, Programming 


Publications Dept. 232, San Jose, California 95114 
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Through the medium of job control state- 
ments, the programmer specifies job 
requirements directly to the operating 
system, thus eliminating many of the 
functions previously performed by the 
operating personnel. The job consists 
of one or more job steps. For example, 
the job of assembling, linkage-editing, 
and executing a source program involves 
three job steps: 


Lis Translating the source program, 
i.e., executing the assembler com- 
ponent of the operating system to 
produce an object module. 

Ze Processing the output of the as- 
sembler, i.e., executing the 
linkage-editor component of the 
operating system to produce a load 
module. 

33 Executing the assembled and linkage- 
edited program, i.e., executing the 
load module. 


A procedure is a sequence of job control 
language statements specifying a job. Pro- 
cedures may enter the system via the input 
stream or from a library of procedures, 


INTRODUCTION 


which are previously defined and contained 
in a procedure library. The input stream 
is the flow of job control statements 
and, optionally, input data entering the 
system from one input device. At the 
sequential scheduling system level of the 
operating system, only one input stream 
May exist at a time. (For a description 
of the operating system environment see 
IBM System/360 Operating System: Con- 
cepts and Facilities. 

The job definition (JOB), execute 
(EXEC), data definition (DD), and delimiter 
(/*) job control statements are shown in 
this publication as they are used to 
specify assembler processing. Detailed 
explanations of these statements are 
given in IBM System/360 Operating System: 
Job Control Language. 

Operating system factors influencing 
program preparation, such as terminating 
the program, saving and restoring general 
registers, and linking of independently 
produced object modules, are discussed in 
Programming Considerations, as are guides 
to determine whether assembler dictionary 
sizes and complexity limitations of source 
statements will be exceeded. 
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ASSEMBLER OPTIONS AND DATA SET REQUIREMENTS 


ASSEMBLER OPTIONS 


The programmer may specify the following 
assembler options in the PARM= field of 

the EXEC statement. They must appear 
between two apostrophes, separated by commas 
with no imbedded blanks. They can appear 

in any order and, if an entry is ommitted, a 
standard setting will be assumed as shown 


below under Default Entry. 


"DECK LOAD, LIST TEST, XREF, 
PARM= or or or or or 
- "NODECK , NOLOAD, NOLIST, NOTEST , NOXREF , 


RENT' 
LINECNT=nn, — or 
NORENT' 


These options are defined as follows: 
DECK -- The object module is placed on 
the device specified in the SYSPUNCH DD 
statement. 
LOAD -- The object module is placed on 
the device specified in the SYSGO DD 
statement. 


NOTE: Specification of the parameter 
LOAD causes object output to be written 
on a data set with ddname SYSGO. This 
action occurs independently of the output 
on SYSPUNCH caused by the parameter DECK. 
The output on SYSGO and SYSPUNCH is iden- 
tical except that SYSPUNCH is closed with 
a disposition of LEAVE, and SYSGO is 
closed with a disposition of REREAD. 


LIST -- An assembler listing is produced. 

TEST -- The object module contains the 
special source symbol table required 
by the test translator (TESTRAN) 
routine. 

XREF -- The assembler produces a cross- 
reference table of symbols as part of 
the listing. 

RENT -- The assembler checks for a possible 
coding violation of program re- 
enterability. 


The prefix,NO, is used with the above 
options to indicate which options are not 
wanted. If contradictory options are 
entered, e.g., LIST, NOLIST, the rightmost 
option, NOLIST, is used. 


LINECNT=nn This parameter specifies the 
number of lines to be printed between 
headings in the listing. The permis- 
sible range is 01 to 99 lines. 


The following is an example of specify- 
ing assembler options: 


EXEC PGM=IEUASM, PARM=’LOAD,NODECK, TEST’ 


DEFAULT ENTRY 


If no options are specified the assembler 
assumes the following default entry: 


| PARM='NOLOAD , DECK , LIST, NOTEST , XREF , LINECNT=55, NORENT' 


The cataloged procedures discussed in 
this guide assume the default entry. How- 
ever, the programmer may override any or 
all of the default options (see Overriding 


Statements in Cataloged Procedures). 


ASSEMBLER DATA SET REQUIREMENTS 


The assembler requires the following four 
data sets: 


® SYSUTI1, SYSUT2, SYSUT3 -- utility data 
sets used as intermediate external 
storage. 


@® SYSIN -- an input data set containing 

the source statements to be processed. 
In addition to the above, four additional 
data sets may be required: 


@e SYSLIB -~ a data set containing macro 
definitions (for macro definitions not 
defined in the source program) and/or 
source coding to be called for through 
COPY assembler instructions. 


e SYSPRINT -- a data set containing output 
text for printing (unless NOLIST option 
is specified). 


e SYSPUNCH -- a data set containing object 
module output usually for punching (un- 
less NODECK option is specified). 


@ SYSGO -- a data set containing object 
module output usually for the linkage 
editor (only if LOAD option is specified). 


The above data sets are described in the 
following text. The ddname that must be 
used in the DD statement describing the 
data set appears as the heading for each 
description. 


Ddnames SYSUT1, SYSUT2, SYSUT3 


These utility data sets are used by the 
assembler as intermediate external storage 
devices when processing the source pro- 
gram. The input/output device(s) assigned 
to these data sets must be capable of 
sequential access to records. The as- 
sembler does. not support multi-volume 
utility data sets. Refer to the Storage 
Estimate manual for the space required. 


Ddname SYSIN 


This data set contains the input to the 
assembler -- the source statements to be 
processed. The input/output device as- 
signed to this data set may be either the 
device transmitting the input stream, or 
another sequential input device designated. 
by the programmer. The DD statement 
describing this data set appears in the 
input stream. The IBM~supplied procedures 
do not contain this statement. 


Ddname SYSLIB 


From this data set, the assembler obtains 
macro definitions and assembler language 
statements to be called by the COPY as- 
sembler instruction. It is a partitioned 
data set and each macro definition or 
sequence of assembler statements is a 
separate member, with the member name being 
the macro instruction mnemonic or COPY 

code name. The data set may be defined as 
_SYS1.MACLIB or a user's private macro 
definition or COPY library. SYS1.MACLIB 
contains macro definitions for the system 
macro instructions provided by IBM. A 
user's private library may be concatenated 
with SYS1.MACLIB. The two libraries must 
have the same attributes, i.e., the same 
blocking factors, block sizes, and record 
formats. The Job Control Language publica- 
tion explains the concatenation of data 
sets. 
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Ddname SYSPRINT 


This data set is used by the assembler to 
produce a listing. Output may be directed 
to a printer, magnetic tape, or DASD. The 
assembler uses the machine code carriage- 
control characters for this data set. 


Ddname SYSPUNCH 


The assembler uses this data set to produce 
the object module. The input/output unit 
assigned to this data set may be either a 
card punch or an intermediate storage de- 
vice (capable of sequential access). 


Ddname SYSGO 


This is a DASD, magnetic tape, or card 
punch data set used by the assembler. It 
contains the same output text as SYSPUNCH. 
It is used as input for the linkage editor 
and may also be used as a punch device (see 
NOTE under Assembler Options). 


DEFINING DATA SET CHARACTERISTICS 


Before a data set can be made available 

to a problem program, descriptive infor- 
mation defining the data set must be 

placed into a data control block for the 
access routines. Sources of information 

for the data control block are keyword 
operands in the DCB macro iustruction or, 

in some cases, the DD stati::nent, data set 
label, or user's problem piogram. General 
information concerning data set definition 
is contained in the Data Management Services 
manual (see Preface). Characteristics of 
data sets supplied by the DCB macro instruc- 
tion are described in the Data Management 


Macro-Instructions manual. (see Preface). 


The specific information that must be 
supplied depends upon the data set organi- 
zation and access method. The following 
access methods are used to process the 
assembler data sets: 


Access Method Data Sets 
QSAM (Queued Sequential) SYSPRINT, SYS- 


PUNCH, SYSGO, 
SYSIN 

BSAM (Basic Sequential) SYSUT1, SYSUT2, 
SYSUT3 


BPAM (Basic Partitioned) SYSLIB 


Table 1 summarizes the assembler capa- 
bilities and restrictions on record length 
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eTable l. 


LRECL Fixed at 80 Fixed at 80 


RECFM 
@ 

BLKSIZE 
@ 


User must specify 
in LABEL or DD card 


F, FS, FBS, FB, 
FBST, FBT 


User must specify 
in LABEL or DD card, 
must be a multiple of 
LRECL 


Optional; if 
omitted 2 is used 


BLKSIZE times 
BUFNO can not be 
greater than 3600 


For 
44K 
availability 


L1 = BLKSIZE 
times BUFNO 


For 
calculating 
core 
requirements 


Data Set Characteristics 


SYSLIB 


User must specify 
in LABEL or DD card 


F, FS, FBS, FB, 
FBST, FBT 


User must specify 
in LABEL or DD card, 
must be a multiple of 
LRECL 


Set by assembler 
to 1 


BLKSIZE can not 
be greater than 3600 


L2 = BLKSIZE 


Minimum core required for the assembler = | 


whichever is greater 


lg tt, 


SYSPRINT 


Fixed at 121 


Set by assembler: 
if BLKSIZE=LRECL, 
RECFM=F SM; 
if BLKSIZE>LRECL, 
RECFM=FBSM 


Optional, but must 
be a multiple of 
LRECL; if omitted 
BLKSIZE=LRECL 


Optional; if 
omitted 2 is used 


BLKSIZE times 
BUFNO can not be 
greater than 1210 


L3 = BLKSIZE 
times BUFNO 


L, +L, + 37000 


+ Lo+ 37000 


SYSPUNCH 


Fixed at 80 


Set by assembler: 
if BLKSIZE=LRECL, 
RECEM=FS; 
if BLKSIZE>LRECL, 
RECFM=FBS 


Optional, but must 
be a multiple of 
LRECL; if omitted 
BLKSIZE=LRECL 


Oprional; if 
omitted 3 is used for 
unit record and 1 for 
other devices 


BLKSIZE times 
BUFNO can not be 
greater than 400 


L4 = BLKSIZE 
times BUFNO 


Maximum core that the assembler can effectively use = Ly + Le+ 535,000 


©™Y ® 0 


For MVT environment add 5,000 for core required 


U = undefined, F = fixed length records, B =blocked records, S = standard blocks, 
T = track overflow, M= machine code carriage control 


Blocking is not allowed on unit record devices. Blocking on other direct access can not 
be greater than ihe track size unless T is specified on RECFM 


SYSUT1 
SYSUT2 
SYSUT3 


Set by assembler: Fixed for U 


if BLKSIZE=LRECL, 
User can not specify; 


RECFM=FS; 
if BLKSIZE>LRECL, 

maximum of 4000, 
minimum of 1739 


SYSGO 


RECFM=FBS 


Optional, but must 
be a multiple of 
LRECL; if omitted 
BLKSIZE=LRECL 


Optional, if 
omitted 3 is used for 
unit record and 1 for 
other devices 


User can not specify; 
either | or 2 


3LKSIZE times 
BUFNO can not be 
greater than 400 


L5 = BLKSIZE 
times BUFNO 





and format, and blocksize and buffering 
facilities available to the user. The 
values shown in Table 1 are based upon the 
minimum core requirements of Assembler F 
(44K), which will allow a symbol table 
length of approximately 7000 bytes. If 
more than 44K is available, the block sizes 
and buffer numbers can be increased. How- 
ever, if the user specifies a combination 
of blocking and buffering which does not 
leave room for the symbol table, abnormal 
termination of the task may occur (ABEND 
804) when the assembler attempts to issue 
a GETMAIN macro instruction. 

In addition to the data set character- 
‘istics shown in Table 1, the following 
options are available to the user (refer to 
the Supervisor and Data Management Macro- 
Instructions publication). Options not 
shown below are fixed by the assembler and 
cannot be specified. 


Data Sets Options 

DEVD (device type) 

BFALN (buffer boundary 
alignment) 

BUFL (buffer length) 

EROPT (error option) 


SYSIN, 
SYSPRINT, 


SYSPUNCH, 
SYSGO 


DEVD (device type) 

OPTCD (optional ser- 
vice for validity 
checking and 
chained scheduling) 


SYSUT1, 2, 3 


RETURN CODES 


Table 2 shows the return codes issued by 
the assembler for use with the COND= para- 
meter of JOB or EXEC statements. The 
COND= parameter is explained in the Job 
Control Language publication. 


The return code issued by the assembler 
is the highest severity code that is: 


Lis Associated with any error detected 
by the assembler (see Appendix A for 
diagnostic messages and severity 
codes). 

2. Associated with MNOTE messages pro- 
duced by macro instructions. 

3. Associated with an unrecoverable I/0 
error occurring during the assembly. 


If a permanent I/O error occurs on any of 
the assembler files or a DD card for a 
required data set is missing, a message is 
printed on the operator's console and an 
ABEND with a user ABEND code of 20 is given 
by the assembler. This terminates the 
assembly. 


Table 2. Return Codes 


Return 
Code Explanation 
8 


4 Minor errors detected; successful program execution is 
probable 


[ee Errors detected; unsuccessful program execution is possible 


12 Serious errors detected; unsuccessful program execution is 
probable 


Le ie Critical errors detected; normal execution is impossible 


Unrecoverable I/O error occurred during assembly or 
missing data sets; assembly terminated 
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CATALOGED PROCEDURES 


This section describes three IBM-provided CATALOGED PROCEDURE FOR ASSEMBLY (ASMFC) 
cataloged procedures: a procedure for as- 
sembling (ASMFC), a procedure for assembling 


and linkage editing (ASMFCL), and a pro- This procedure requests the operating 
cedure for assembling, linkage editing, system to load and execute the assembler. 
and executing (ASMFCLG). The procedures The name ASMFC must be used to call this 
rely on conventions regarding the naming of procedure. The result of execution is an 
device classes. These conventions, shown object module, in punched card form, and 
in Table 3, must be incorporated into the an assembler listing. 
system at system generation time. In the following example, input enters 
via. the input stream. The statements 
Table 3. Device Naming Conventions. entered in the input stream to use this 





procedure are: 


SYSSQ 


To use cataloged procedures, EXEC state— 
ments naming the desired procedures are 
placed in the input stream following the /* (delimiter statement) 
JOB statement. Subsequently, the specified 
cataloged procedure is brought from a 





Any devices allowing 
sequential access to records 
for reading and writing 







//jobname JOB 
//stepname EXEC PROC= ASMFC 
//ASM.SYSIN DD * 

| 


source program statements 






procedure library and merged into the in- The statements of the ASMFC procedure 

put stream. are brought from the procedure library and 
The System Programmer's Guide discusses merged into the input stream. 

the placing of procedures in the procedure Figure 1 shows the statements that make 

library. up the ASMFC procedure. 


"ASM EXEC PGM=IEUASM ,REGION=50K 
2 //SYSLIB DSNAME=SYS1.MACLIB, DISP=SHR 


3 
//SYSUTI UNIT=SYSSQ, SPACE=(1700, (400, 50)) 


4 
J/SNSUT2 UNIT=SYSSQ, SPACE=(1700, (400, 50)) 


5 
//SXSUT3 UNIT=(SYSSQ ,SEP=(SYSUT2, SYSUT1, SYSLIB)), 
H/ SPACE=(1700, (400, 50) 


© /SY SPRINT SYSOUT=A 


7 //SYSPUNCH DD SYSOUT=B 


} PARM= or COND= parameters may be added to this statement by the EXEC statement that calls the procedure (see Overriding Statements in 


Cataloged Procedures). The system name IEUASM identifies Assembler F. 
7 This statement identifies the macro library data set. The data set name SYS1,MACLIB is an IBM designation, 


345 These statements specify the assembler utility data sets. The device classname used here, SYSSQ, may represent a collection of tape 
drives, or direct-access units, or both, The I/O units assigned to this name are specified by the installation when the system is generated. 
A unit name, e.g., 2311 may be substituted for SYSSQ, 


The SEP= subparameter in statement 5 and the SPACE= parameter in statements 3, 4, and 5 are effective only if the device assigned is a 
direct-access device: otherwise they are ignored, The space required is dependent on the make-up of the source program, 


The Job Control Language publication explains space allocation. 


° This statement defines the standard system output class, SYSOUT=A, as the destination for the assembler listing. 


ss This statement describes the data set that will contain the object module produced by the assembler, 





Figure 1. Cataloged Procedure for Assembly (ASMFC) 


e6 


CATALOGED PROCEDURE FOR ASSEMBLY AND 
LINKAGE~EDITING (ASMFCL) 


This procedure consists of two job steps: 
assembling and linkage editing. The name 
ASMFCL must be used to call this procedure. 
Execution of this procedure results in the 
production of an assembler listing, a 
linkage editor listing, and a load module. 

The following example assumes input to 
the assembler via the input job stream. It 
also makes provision in the //LKED job step 
for concatenating the input to the linkage 
editor from the //ASM job step with any 
additional linkage editor input in the in- 
put job stream. This additional input can 
be a previously produced object module 
which is to be linked to the object module 
produced by job step //ASM. 

An example of the statements entered in 
the input stream to use this procedure is: 
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//jobname JOB 
//stepname EXEC PROC=ASMFCL 
//ASM.SYSIN DD : 

] 


! 
source program statements 


/* 


//LKED .SYSIN DB * 


We Oe we 


necessary only if linkage 
editor is to combine modules. 
or read linkage editor control 
information from the job stream 


object module or 

linkage editor 

control statements 
* 

The procedure is brought from the pro- 
cedure library and merged into the input 
stream. 

Figure 2 shows the statements that make 
up the ASMFCL procedure. Only those state- 
ments not previously discussed are 
explained. 


//ASM EXEC PGM=IEUASM ,PARM=LOAD ,REGION=50K 
//SNSLIB DD DSNAME=SYS1.MACLIB, DISP=SHR 
//SYSUTI DD —UNIT=SYSSQ,SPACE=(1700, (400, 50)) 
//SYSUT2 DD —_ UNIT=SYSSQ, SPACE=(1700, (400, 50)) 
//SYSUT3 DD ~—UNIT=(SYSSQ,, SEP=(SYSUT2, SYSUT1, SYSLIB)), x 
ia SPACE=(1700, (400, 50)) 
//SYSPRINT DD SYSOUT=A 
//SYSPUNCH DD  SYSOUT=B 
; 
//SYSGO DD DSNAME=&LOADSET,UNIT=SYSSQ ,SPACE=(80, (100, 50)), X 
// DISP=(MOD ,PASS) 
j 
//LKED EXEC PGM=IEWL,PARM=(XREF ,LIST, NCAL) ,REGION=96K, x 
H/ COND=(8,LT,ASM) | 
3 
4 //SYSLIN DD =DSNAME=&LOADSET ,DISP=(OLD , DELETE) 
// DD ~— DDNAME=SYSIN 
5 
//SYSLMOD DD  DSNAME=&TEMP(PDS).UNIT=SYSDA, SPACE=(1024, (50,20, 1)), x 
// DISP=(MOD ,PASS) 
//SYSUT) DD _—_—UNIT=(SYSDA, SEP=(SYSLIN , SYSLMOD)) , SPACE=(1024, (50, 20)) 


7 //SNSPRINT DD 


SYSOUT=A ,DCB=(, BLKSIZE=121) 


In this procedure the SYSGO DD statement describes a temporary data set -- the object module -- which is to be passed to the linkage editor. 


This statement initiates linkage editor execution. The linkage editor options in the PARM= field cause the linkage editor to produce a cross-reference 


table, module map, and a list of all control statements processed by the linkage editor, The NCAL option suppresses the automatic library call function 


of the linkage editor, 


This statement identifies the linkage editor input data set as the same one produced as output by the assembler. 
This statement is used to concatenate any input to the linkage editor from the input stream with the input from the assembler, 


This statement specifies the linkage-editor output data set (the load module). As specified, the data set will be deleted at the end of the job, If it is 


desired to retain the load module, the DSNAME parameter must be respecified and a DISP parameter added. See Overriding Statements in Cataloged 
Procedures, If the output of the linkage editor is to be retained, the DSNAME parameter must specify a library name and member name where the load 
module is to.be placed. The DISP parameter must specify either KEEP or CATLG, 


This statement specifies the utility data set for the linkage editor. 


This statement identifies the standard output class as the destination for the linkage editor listing. 


Figure 2. 


Cataloged Procedure for Assembling and Linkage Editing (ASMFCL) 
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CATALOGED PROCEDURE FOR ASSEMBLY, 
LINKAGE-EDITING, AND EXECUTION 
(ASMFCLG) 


This procedure consists of three job 
steps: assembling, linkage editing, and 
executing. 

Figure 3 shows the statements that make 
up the ASMFCLG procedure. Only those 
statements not previously discussed are 
explained in the figure. 

The name ASMFCLG must be used to call 
this procedure. Assembler and linkage 
editor listings are produced. 

The statements entered in the input 
stream to use this procedure are: 


//KASM PGM=IEUASM , PARM=LOAD ,REGION=50K 
//SYSLIB DSNAME=SYS1.MACLIB, DISP=SHR 


//SYSUT] UNIT=SYSSQ, SPACE=(1 700, (400, 50)) 


//SNSUT2 UNIT=SYSSQ, SPACE=(1 700, (400, 50)) 


//SYSUT3 UNIT=(SYSSQ , SEP=(SYSUT2, SYSUT1 , SYSLIB)), 


// SPACE=(1 700, (400, 50)) 
//SYSPRINT SYSOUT =A 


//SYSPUNCH SYSOUT=B 


//jobname JOB 
//stepname EXEC PROC=ASMFCLG 
//ASM.SYSIN DDB * 
' 
source program statements 


/* 
//LKED.SYSIN DD * 
! 
object module or 
linkage editor 
control statements 


necessary only if linkage 

editor is to combine modules 

or read linkage editor control 

4 information from the job stream 
* 

//GO.ddname DD (parameters) 

//GO.ddname DD (parameters) 

//GO .ddname DDB * only if 

necessary 


t 
problem program input 
' 


/* 


//SYSGO DSNAME=&LOADSET, UNIT=SYSSQ, $PACE=(80, (100,50), 


// DISP=(MOD, PASS) 


: //LKED PGM=IEWL..PARM=(XREF , LET LIST, NCAL) RREGION=96K, 


Ve COND=(8, LT, ASM) 


//SXSLIN DSNAME=&LOADSET , DISP=(OLD , DELETE) 
// DDNAME=SYSIN 


7 //SNSLMOD DD DSNAME=&GOSET(GO), UNIT=S YSDA , SPACE=(1024, (50,20, 1)), 


// DiSP=(MOD ,PASS) 


J/SNX SUT DD UNIT=(SYSDA, SEP=(S YSLIN ,SYSLMOD)), SPACE=(1024, (50, 20)) 


//SNSPRINT DD SYSOUT=A,DCB=(, BLKSIZE=121) 


EXEC PGM=*,LKED,SYSLMOD,COND=((8,LT,ASM) , (4,LT,LKED)) 


} The LET linkage-editor option specified in this statement causes the linkage editor to mark the load module as executable even though errors were 


encountered during processing. 


The output of the linkage editor is specified as a member of a temporary data set, residing on a direct-access device, and is to be passed to a 
succeeding job step. 


This statement initiates execution of the assembled and linkage edited program, The notation *,LKED,SYSLMOD identifies the program to be 
executed as being in the data set described in job step LKED by the DD statement named SYSLMOD. = When running with MVT (Option 4) the 


REGION parameter can be calculated with the help of the Storage Estimates publication (see preface). 





Figure 3. Cataloged Procedure for Assembly, Linkage Editing and Execution (ASMFCLG) 
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OVERRIDING STATEMENTS IN CATALOGED 
PROCEDURES 


Any parameter in a cataloged procedure can 
be overriden except the PGM= parameter in 
the EXEC statement. Such overriding of 
statements or fields is effective only 
for the duration of the job step in which 
the statements appear. The statements, 
as stored in the procedure library of the 
system, remain unchanged. 

Overriding for the purposes of re- 
specification, addition, or nullification 
is accomplished by including in the input 
stream statements containing the desired 
changes and identifying the statements 
to be overriden. 


EXEC Statements 


The PARM= and COND= parameters can be added 
or, if present, re-specified by including 
in the EXEC statement calling the pro- 
cedure the notation PARM.stepname=, or 
COND. stepname=, followed by the desired 
parameters. "Stepname" identifies the 

EXEC statement within the procedure to 
which the modification applies. Overriding 
the PGM= parameter is not possible. 

If the procedure consists of more than 
one job step, a PARM,.stepname= or COND. 
stepname= parameter may be entered for 
each step. The entries must be in order, 
i.e., PARM.stepl=, PARM.step2=, etc. 


DD Statements 


All parameters in the operand field of DD 
statements may be overridden by including 
in the input stream (following the EXEC 
card calling the procedure) a DD statement 
with the notation //stepname.ddname in the 
name field. "Stepname" refers to the job 
step in which the statement identified by 
"ddname" appears. 


Examples 


In the assembly procedure ASMFC (Figure 1), 
the production of a punched object deck 
could be suppressed and the UNIT= and SPACE= 
parameters of data set SYSUT1 re-specified, 
by including the following statements in 
the input stream: 


//stepname EXEC PROC=ASMFC, 
LA PARM. ASM=NODECK 


//ASM.SYSUTI DD UNIT=2311, X 
// SPACE=(200, (300, 40)) 


//ASM.SYSIN DD * 
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In procedure ASMFCLG (Figure 3), suppress- 
ing production of an assembler listing and 
adding the COND= parameter to the EXEC 
statement, which specifies execution of the 
linkage editor, may be desired. In this 
case, the EXEC statement in the input 
stream would appear as follows: 


//stepname EXEC PROC=ASMFCLG, x 
Lt PARM. ASM=(NOLIST, LOAD), x 
COND.LKED=(8, LT, stepname . ASM) 


NOTE: Overriding the LIST parameter ef- 
fectively deletes the PARM=LOAD so this 
must be repeated in the override statement. 


For current execution of procedure 
ASMFCLG, no assembler listing would be 
produced, and execution of the linkage 
editor job step //LKED would be suppressed 
L£ the return code issued by the assembler 
(step ASM) was greater than 8. Using the 
procedure ASMFCL (Figure 2) to 


1. Read input from a non-labeled 9-track 
tape on unit 282 that has a standard . 
blocking factor of 10; 

2. Put the output listing on a labeled tape 
VOLID=TAPE10, with a data set name of 
PROG1 and a blocking factor of 5; 

3. Block the SYSGO output of the assembler 
and use it as input to the linkage edi- 
tor with a blocking factor of 5; 

4. Link edit the module only if there are 
no errors in the assembler, i.e., COND=0; 

5. Link edit on to a previously allocated 
and cataloged data set USER.LIBRARY 
with a member name of PROG, the input 
stream appears as follows: 


// jobname JOB 

//stepname EXEC PROC=ASMFCL, Xx 
// COND .LKED=(0, NE, stepname.ASM) 
J/ASM.SYSPRINT = DD DSNAME=PROG1, UNIT=TAPE, X 
Jf VOLUME=SER=TAPE10, DCB=(BLKSIZE=605) 
//ASM.SYSGO DD DCB=(BLKSIZE=400) 

//ASM.SYSIN DD UNIT=282, LABEL=(, NL), x 
Jf DCB=(RECFM=FSB, BLKSIZE=800) 


//LKED.SYSIN DD DCB=stepname. ASM.SYSGO 
//LKED.SYSLMOD DD —DSNAME=USER .LIBRARY(PROG), DISP=OLD 
/* 


NOTE: The order of appearance of ddnames 
within job steps ASM and LKED has been pre- 
served. Thus, SYSPRINT precedes SYSGO with- 
in step ASM. The ddname ASM.SYSIN was 
placed last since SYSIN does not occur at 


\ 
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all within step ASM. These points are 
covered in the section Using Cataloged 


Procedures in the Job Control Language 
manual. 


To assemble two programs, link edit the two 
assemblies into one load module and execute 
the load module, entering at PROG, the 
input stream appears as follows: 


//stepname| EXEC PRO G=ASMFC, PARM.ASM='LOAD’ 
//ASM.GO DD DSNAME=8&LO ADSET, UNIT=SYSSQ, Xx 
Hd SPACE=(80,(100,50)), X 
Hf DISP=(MOD, PASS) ,OCB=(BLKS!ZE=400) 
//ASM.SYSIN DD * 

1 

' 

t 

source program | statements 

i 

I 
i 


PROC=ASMFCLG 
DCB=(BLKSIZE=400) 


//stepname2 EXEC 
//ASM.SYSGO DD 


//ASM.SYSIN DD * 
' 
\ 
1 
source program 2 statements 
' 
' 
1 
fe ! 
//LKED.SYSLIN DD DCB=(RECFM=FB, BLKS!ZE=400) 
//LKED.SYSIN DD 7 
ENTRY PROG 
/* 


//GO.ddname dd cards for GO step 
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The overriding step with ddname =LKED.SYSLIN 
is necessary whenever output from an 
assembly and output from at least one or 
more processors (including the Assembler) is 
placed on SYSLIN. The DCB=(RECFM=FB,...) 
allows the linkage editor to process all 
the blocked input. Otherwise it will stop 
reading SYSLIN whenever it encounters a 
partial block. Such a situation arises if, 
say, the first assembly produces 22 cards. 
These 22 cards result in 4 full blocks of 
400 bytes (5 times 80) plus 1 partial block 
of 160 bytes (2 times 80). 

The Job Control Language and System 
Programmer's Guide publications provide 
additional description of overriding 
techniques. 
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ASSEMBLER LISTING 


The assembler listing (Figure 4) consists 
of five sections, ordered as follows: ex- 
ternal symbol dictionary items, the source 
and object program statements, relocation 
dictionary items, symbol cross reference 
table, and diagnostic messages. In addi- 
tion, three statistical messages may 
appear in the listing: 


1. After the diagnostics, a statements- 
flagged message indicates the total 
number of statements in error. It 
appears as follows: nnn STATEMENTS 
FLAGGED IN THIS ASSEMBLY. 

Ze After the statements-flagged message, 
the assembler prints the highest sever- 
ity code encountered (if non-zero). 
This is equal to the assembler return 
code. The message appears as follows: 
nn WAS HIGHEST SEVERITY CODE. 

a6 After the severity code, the assembler 
prints a count of lines printed, which 
appears as follows: nnn PRINTED LINES. 
This is a count of the actual number 
of 121-byte records generated by the 
assembler; it may be less than the 
total number of printed and blank 
lines appearing on the listing if the 
SPACE n assembler instruction is used. 
For a SPACE n that does not cause an 
eject, the assembler inserts n blank 
lines in the listing by generating 
n/3 blank 121-byte records -- rounded 
to the next lower integer if a frac- 
tion results; e.g., for a SPACE 2, no 
blank records are generated. The as- 
sembler does not generate a blank 
record to force a page eject. 


In addition to the above items, the 
assembler prints the deck identification 
and current date on every page of the 
listing. If the timer is available, the 
assembler prints the time of day to the 
left of the date on page 1 of the ESD 
listing. This is the time when printing 
starts, rather than the start of the assem- 
bly, and is intended only to provide unique 
identification for assemblies made on the 
same day. ‘The time is printed as hh.mn, 
where hh is the hour of the day (midnight 
beginning at 00), and mm is the number of 
minutes past the hour. 


EXTERNAL SYMBOL DICTIONARY (ESD) 


This section of the listing contains the 
external symbol dictionary information 
passed to the linkage-editor in the object 
module. The entries describe the control 
sections, external references, and entry 
points in the assembled program. There 
are six types of entries, shown in Table 4, 
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along with their associated fields. The 
circled numbers refer to the corresponding 
heading in the sample listing (Figure 4). 
The X's indicate entries accompanying each 
type designation. 


Table 4. Types of ESD Entries 


0) : © 
SYMBOL| TYP ADDR |LENGTH| LD ID 


s ae 
a Ee 
Eee 
peed 
cores 
RI 






P 


x fo 
| x | 
eae 
Ler pete 


Cc 


= 


“EEE ® 





1. This column contains the name of every 
external dummy section, control sec- 
tion, entry point, and external symbol. 

2. This column contains the type design- 
ator for the entry, as shown in the 
table. The type designators are de- 
fined as: 


SD--Names section definition. The sym- 
bol appeared in the name field of 
a CSECT or START statement. 

LD--The symbol appeared as the operand 
of the ENTRY statement. 

ER--External reference. The symbol 
appeared as the operand of an EXTRN 
statement, or was defined as a V- 
type address constant. 

PC--Unnamed control section definition. 

CM--Common control section definition. 

XD--External dummy section. 


3. This column contains the external sym- 


bol dictionary identification number 
(ESDID). The number is a unique two- 
digit hexadecimal number identifying 
the entry. It is used by the LD entry 
of the ESD and by the relocation 
dictionary for cross-referencing the 
ESD. 


4. This column contains the address of the 


symbol (hexadecimal notation) for SD- 
and LD-type entries, and zeros for ER- 
type entries. For PC- and CM-type 
entries, it indicates the beginning 
address of the control section. For 


EXTERNAL SYMBOL DICTIONARY 


®2OO © ®O 


EXAM 
SYMBOL TYPE ID ADDR LENGTH LD 1D 
SAMPLR SD 01 000000 000388 


@ 


EXAM SAMPLE PROGRAM 


OD) @ ® 





Page 1 
00.16 4/11/66 


@ 


Page 3 


© © 


LOC OBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT F 14FEB66 «4/11/66 
000000 47FO FOOA O000A S59+BEGIN B 10(0,15) BRANCH AROUND ID 
000004 05 60+ DC ALI(5) 
000005 C2C5C7C9D5 61+ DC CL5'BEGIN' IDENTIFIER @O 
O0000A + 90EC DOOC 0000C 62+ STM 14,12, 12(13) SAVE REGISTERS 
OOOOOE 05C0 63 BALR R12,0 ESTABLISH ADDRESSABILITY OF PROGRAM SAMPLO57 
000010 64 USING *,R12 AND TELL THE ASSEMBLER WHAT BASE TO USE SAMPLO58 
@ RELOCATION DICTIONARY @ 
EXAM Page 1 
Q@ @® 
POS.ID  =REL.ID FLAGS ADDRESS 4/11/66 
01 01 oc OO0IFC 
01 01 oc 00020C 
01 01 0c 00021C 
01 01 oc 0002D4 
01 01 oc 000334 
® CROSS-REFERENCE @ 
EXAM Page 1 
@ 8 ® ® 9 
SYMBOL LEN VALUE DEFN REFERENCES 4/11/66 
BEGIN 00004 000000 0059 0156 0158 0174 0184 0186 0220 
EXIT 00004 00007E 00% 0111 
HIGHER 00002 O000F4 0130 0125 
IHB0005 00001 00007B 0093 009 ' 
IHBOOO5A 00002 00007C 0094 0089 
@ DIAGNOSTICS @ 
XAM Page 1 
2 oe 
TMT ERROR CODE MESSAGE 4/11/66 
19 1EU025 NEAR OPERAND COLUMN 7--RELOCATABILITY ERROR 


21 [EU035 NEAR OPERAND COLUMN 9--ADDRESSABILITY ERROR 


2 STATEMENTS FLAGGED IN THIS ASSEMBLY 
8 WAS HIGHEST SEVERITY CODE 
261 PRINTED LINES 
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XD-type entries, it indicates the 
alignment by printing a number one 6. 
less than the number of bytes in the 
unit of alignment, e.g., 7 indicates 
double word alignment. 
5. This column contains the assembled 
length, in bytes, of the control 





section (hexadecimal notation). 

This column contains, for LD-type 
entries, the identification (ID) 
number assigned to the ESD entry that 
identifies the control section in 
which the symbol was defined. 
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SOURCE AND OBJECT PROGRAM 14. 


This section of the listing documents 
the source statements and the resulting 
object program. 


7. This is the four-character deck iden- 
tification. It is the symbol that 
appears in the name field of the first 
TITLE statement. The assembler 
prints the deck identification and 
date (item 16) on every page of the 
listing. 

8. This is the information taken from the 
operand field of a TITLE statement. 


NOTE: TITLE, SPACE and EJECT state- 
ments will not appear in the source 
listing unless the statement is con- 
tinued onto another card. Then the 
first card of the statement is printed. 
However, any of these three types of 
statements, if generated as macro in- 
struction expansion, will never be 
listed regardless of continuation. 


9. Listing page number. Each section of 
the listing starts with page l. 

10. This column contains the assembled 
address (hexadecimal notation) of the 
object code. 

11. This column contains the object code 
produced by the source statement. The 
entries are always left-—justified. 
The notation is hexadecimal. Entries 
are machine instructions or assembled 
constants. Machine instructions 
are printed in full with a blank 
inserted after every four digits 
(two bytes). Constants may be only 
partially printed (see the PRINT 
assembler instruction in the As- 
sembler Language publication). 

12. These two columns contain effective 
addresses (the result of adding to- 
gether a base register value and dis- 
placement value): 


ae The column headed ADDRI contains 
the effective address for the 
first operand of an SS in- 
struction. 

b. The column headed ADDR2 contains 
the effective address of the 
second operand of any instruc- 
tion referencing storage. 


Both address fields contain six 
digits; however, if the high-order 
digit is a zero, it is not printed. 

13. This column contains the statement 
number. A plus sign (+) to the right 
of the number indicates that the state- 
ment was generated as the result of 
macro instruction processing. 
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This column contains the source pro- 
gram statement. The following items 
apply to this section of the listing: 


ae Source statements are listed, 
including those brought into the 
program by the COPY assembler 
instruction, and including macro 
definitions submitted with the 
main program for assembly. 
Listing control instructions are 
not printed, except for the 
following case: PRINT is listed 
when PRINT ON is in effect and a 
PRINT statement is encountered. 

b. Macro definitions obtained from 
SYSLIB are not listed. 

c. The statements generated as the 
result of a macro instruction 
follow the macro instruction in 
the listing. 

ds Assembler or machine instructions 
in the source program that con- 
tain variable symbols are listed 
twice: as they appear in the 
source input, and with values 
substituted for the variahle 
symbols. 

ey Diagnostic messages are not list- 
ed in-line in the source and 
object program section. An error 
indicator, ***ERROR***, follows 
the statement in error. The 
message appears in the diagnostic 
section of the listing. 

£ : MNOTE messages are listed in-line 
in the source and object program 
section. An MNOTE indicator 
appears in the diagnostic section 
of the listing for MNOTE state- 
ments other than MNOTE*. The 
MNOTE message format is severity 
code, message text. 

ge The MNOTE* form of the MNOTE 
statement results in an in-line 
message only. An MNOTE indicator 
does not appear in the diagnostic 
section of the listing. 

h. When an error is found in a 
programmer macro definition, it 
is treated the same as any other 
assembly error: the error 
indication appears after the 
statement in error, and a diag- 
nostic is placed in the list of 
diagnostics. However, when 
an error is encountered during the 
expansion of a macro instruction 
(system- or programmer-defined), 
the error indication appears in 
place of the erroneous statement, 
which is not listed. The error 
indication follows the last 
statement listed before the 


15. 


16. 
uy 


erroneous statement was en- 
countered, and the associated 
diagnostic message is placed in 
the list of diagnostics. 

ae Literals that have not been 
assigned locations by an LTORG 
statement appear in the listing 
following the END statement. 
Literals are identified by the 
equal (=) sign preceding them. 

“ If the END statement contains an 
operand, the transfer address 
appears in the location column 
(LOC). 

k,. In the case of COM, CSECT, and 
DSECT statements, the location 
field contains the beginning ad- 
dress of these control sections, 
i.e., the first occurrence. 

Iss In the case of EXTRN, ENTRY, and 
DXD instructions, the. location 
field and object code field are 
blank. 

m. For a USING statement, the loca- 
tion field contains the value of 
the first operand. 

n. For LTORG and ORG statements, the 
location field contains the loca- 
tion assigned to the literal pool 
or the value of the ORG operand. 

O. For an EQU statement, the loca- 
tion field contains the value 
assigned. 

oe Generated statements always 
print in normal statement for- 
mat. Because of this, it is 
possible for a generated state- 
ment to occupy three or more con- 
tinuation lines on the listing. 
This is unlike source statements, 
which are restricted to two con- 
tinuation lines. 

This column contains the identifier 

of the assembler (F) and the date 

when this version was released by 

Systems Development Division to DPD 

Program Information Department. 

Current date (date run is made). 

Identification-sequence field from 

the source statement. 


RELOCATION DICTIONARY 


This section of the listing contains the 
relocation dictionary information passed 
to the linkage editor in the object module. 
The entries describe the address constants 
in the assembled program that are affected 
by relocation. 


18. 


This column contains the external 
symbol dictionary ID number assigned 
to the ESD entry that describes the 
control section in which the address 
constant is used as an operand. 


19. This column contains the external sym- 
bol dictionary ID number assigned to 
the ESD entry that describes the con- 
trol section in which the referenced 
symbol is defined. 

20. The two-digit hexadecimal number in 
this column is interpreted as follows: 


First Digit. A zero indicates that 
the entry describes an A-type or 
Q-type address constant. A one in- 
dicates that the entry describes a 
V-type address constant. A three 
describes a CXD entry. 

Second Digit. The first three bits 
of this digit indicate the length 
of the constant and whether the 
base should be added or subtracted: 


Bits 0 and 1 Bit 2 
00 = 1 byte O = + 
01 = 2 bytes l= - 
10 = 3 bytes 
ll = 4 bytes 


21. This column contains the assembled ad- 
dress of the field where the address 
constant is stored. 


CROSS REFERENCE 


This section of the listing information 
concerns symbols which are defined and 
used in the program. 


22. This column contains the symbols. 

23. This column states the length (deci- 
mal notation), in bytes, of the field 
occupied by the symbol value. 

24. This column contains either the ad- 
dress the symbol represents, or a 
value to which the symbol is equated. 

25. This column contains the statement 
number of the statement in which the 
symbol was defined. 

26. This column contains the statement 
numbers of statements in which the 
symbol appears as an operand. In the 
case of a duplicate symbol, the assem- 
bler fills this column with the mes- 
sage: 


****DUPLICATE**** 


The following notes apply to the 
cross-reference section: 


e Symbols appearing in V-type ad- 
dress constants do not appear in 
the cross-reference listing. 


e A PRINT OFF listing control in- 
struction does not affect the 
production of the cross-reference 
section of the listing. 
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@ In the case of an undefined symbol, 
the assembler fills columns 23, 24, 
and 25 with the message: 


*** UNDEF INED* ***, 
DIAGNOSTICS 


This section contains the diagnostic mes- 
sages issued as a result of error condi- 
tions encountered in the program. The 
text, severity code, and explanatory notes 
for each message are contained in Appendix 
A 

a? 


27. This column contains the number of the 
statement in error. 

28. This column contains the message iden- 
tifier. 

29. This column contains the message, and, 
in most cases, an operand column point-— 
er that indicates the vicinity of the 
error. In the following example, the 
approximate location of the addressa- 
bility error occurred in the 9th col- 
umn of the operand field: 

Example: 
STMT ERROR CODE MESSAGE 
21 TEU035 NEAR OPERAND COLUMN 9 -= ADDRESSABILITY ERROR 
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The following notes apply to the diag- 
nostic section: 


@ An MNOTE indicator of the form MNOTE 
STATEMENT appears in the diagnostic 
section if an MNOTE statement other 
than MNOTE* is issued by a macro in- 
struction. The MNOTE statement itself 
is in-line in the source and object 
program section of the listing. The 
operand field of an MNOTE* is printed 
as a comment, but does not appear in 
the diagnostic section. 


@® A message identifier consists of six 
characters and is of the form: 
TEUxXxx 
IEU identifies the issuing agent 
as Assembler F, and xxx is a 
unique number assigned to the 
message. 


NOTE: Editing errors in system macro in- 
structions are discovered at the time the 
macro instruction is read from the library, 
i.e., after the END statement. To determine 
the location of these errors it is necessary 
to punch all system macro instructions, in- '' 
cluding inner macro instructions, and in- 
sert them in the source program as program- 
mer macro instructions. To aid in debugging, 
it is advisable to run all macro instruc- 
tions as programmer macro instructions before 


incorporating them as system macro instruc- 
tions. 





This section consists of a number of dis- 
crete subjects about assembler language 
programming. 


SAVING AND RESTORING GENERAL REGISTER 
CONTENTS 


A problem program should save the values 
contained in the general registers upon com- 
mencing execution and, upon completion, re- 
store to the general registers these same 
values. Thus, as control is passed from the 
operating system to a problem program and, 
in turn, to a subprogram, the status of the 
registers used by each program is preserved. 
This is done through use of the SAVE and 
RETURN system macro instructions. 

The SAVE macro instruction should be the 
first statement+in the program. It stores 

_ the contents of registers 14, 15, and 0 
through 12 in an area provided by the pro- 
gram that passes control. When a problem 
program is given control, register 13 
points to an area in which the general 
register contents should be saved. 

If the program calls any subprograms, 
or uses any operating system services other 
than GETMAIN, FREEMAIN, ATTACH, and XCTL, 
it must first save the contents of register 
13 and then load the address of an 18 full- 
word save area into register 13. This save 
area is in the problem program and is used 
by any subprograms or operating system 
services called by the problem program. 

At completion, the problem program re- 
stores the contents of general registers 
14, 15 and 0-12 by use of the RETURN system 
macro instruction (which also indicates 
program completion). The content of regis- 
ter 13 must be restored before execution of 
the RETURN macro instruction. 

The coding sequence that follows illus- 
trates the basic process of saving and re- 
storing the registers. A complete discus- 
sion of the SAVE and RETURN macro instruc- 
tions and the saving and restoring of 
registers is contained in the Data Manage- 


ment Services and Data Management Macro- 
Instructions publications (see Preface). 


(14, 12) 










set up base register 


13, SAVEBLK+4 
13, SAVEBLK 









13, SAVEBLK+4 
(14,12) 
18F '0' 












RETURN 
DC 






SAVEBLK 


by the COPY assembler instruction, 
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PROGRAM TERMINATION 


Completion of an assembler source program 
is indicated by using the RETURN system 
macro instruction to pass control from the 
terminating program to the program that in- 
itiated it. The initiating program may be 
the operating system or, if a subprogram is- 
sued the RETURN, the program that called it. 

In addition to indicating program com- 
pletion and restoring registers, the RE- 
TURN macro instruction may also pass a re- 
turn code -- a condition indicator that 
may be used by the program receiving control. 
If the return is to the operating system, 
the return code is compared against the 
condition stated in the COND= parameter of 
the JOB or EXEC statements. If return is 
to another problem program, the return 
code is available in general register 15, 
and may be used as desired. Register 13 
should be restored before issuing the. RE- 
TURN macro instruction. 

The RETURN system macro instruction is 
discussed in detail in the Supervisor and 
Data Management Macro-Instructions pub- 


lication. 
PARM FIELD ACCESS 


Access to information in the PARM field of 
an EXEC statement is gained through general 
register 1. When control is given to the 
problem program, general register 1 con- 
tains the address of a full word which, in 
turn, contains the address of the data area 
containing the information. 

The data area consists of a half word con- 
taining the count (in binary) of the number 
of information characters, followed by the 
information field. The information field is 
aligned to a full-word boundary. The follow- 
ing diagram illustrates this process. 


General Register | 


Address of Full Word 
Points 


to Full Word 


Address of Data Area 


Data Area 


Information Field 


MACRO DEFINITION LIBRARY ADDITIONS 











Points 
to 





Source statement coding, to be retrieved 
and 
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macro definitions may be added to the mac-— 
ro library. The IEBUPDAT utility program 
is used for this purpose. Details of this 
program and its control statements are con- 
tained in the Utilities publication. The 
following sequence of job control state- 
ments can be used to call the utility pro- 
gram and identify the needed data sets. 

It is assumed that the job control state- 
ments, IEBUPDAT program control statements, 
and data are to enter the system via the 
input stream. 


//jobname JOB 

//stepname EXEC PGM=IEBUPDAT, PARM=NEW 

J /SYSUT2 DD DSNAME=SYS1.MACLIB, DISP=OLD 
//YSPRINT DD SYSOUT=A 

//SNSIN DD * 


IEBUPDAT control statements and source statements or 
macro-definitions to be added to the macro-library 


(SYS1.MACLIB) 


/* (delimiter statement) 


LOAD MODULE MODIFICATION - ENTRY POINT 
RESTATEMENT 


If the editing functions of the linkage 
editor are to be used to modify a load 
module, the entry point to the load module 
must be restated when the load module is 
reprocessed by the linkage editor. Other- 
wise, the first byte of the first control 
section processed by the linkage editor 
will become the entry point. To enable 
restatement of the original entry point, 
or designation of a new entry point, the 
entry point must have been identified 
originally as an external symbol, i.e., 
appeared as an entry in the external 
symbol dictionary. External symbol 
identification is done automatically by 
the assembler if the entry point is the 
name of a control section or START state- 
ment; otherwise, an assembler ENTRY state- 
ment must be used to identify the entry 
point name as an external symbol. 

When a new object module is added to or 
replaces part of the load module, the 
entry point is restated in one of three 
ways: 


@ By placing the entry point symbol in the 
operand field of an EXTRN statement 
and an END statement in the new object 
module. 
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@ By using an END statement in the new 
object module to designate a new entry 
point in the new object module. 


@ By using a linkage editor ENTRY state- 
ment to designate either the original 
entry point or a new entry point for 
the load module. 


Further discussion of load module entry 
points is contained in the Linkage Editor 
publication. 


OBJECT MODULE LINKAGE 


Object modules, whether Assembler-, FOR- 
TRAN-, or COBOL-generated, may be combined 
by the linkage editor to produce a compo- 
site load module, provided each object 
module conforms to the data formats and 
linkage conventions required. This topic 
discusses the use of the CALL system macro 
instruction to link an assembler language 
"Main" program to subprograms produced by 
FORTRAN and COBOL. The Supervisor and Data 
Management Macro-Instructions publication 
contains additional details concerning 
linkage conventions and the CALL system 
macro instruction. 

Figure 5 shows the statements used to 


establish the assembler program linkage 
to the called subprograms. 

If any input/output operations are per- 
formed by called subprograms, appropriate 
DD statements for the data sets used by the 
subprograms must be supplied. See the 
FORTRAN IV (E) Programmer's Guide publica- 
tion for explanation of the DD statements 
used to describe data sets for FORTRAN pro- 
grams and a description of the special FOR- 
TRAN data set record formats. The COBOL 
(E) Programmer's Guide publicaticn provides 


DD statement information for COBOL programs. 


DICTIONARY SIZE AND SOURCE STATEMENT COM-— 
PLEXITY 


This section describes the composition of 
the assembler dictionaries and their entry 
sizes, and describes methods for determin- 
ing if the limits on source statement com- 
plexity will be exceeded. 

Dictionary entries, e.g., sequence sym- 
bol names, prototype symbolic parameters, 
vary in length. Therefore, the number of 
entries a dictionary can hold is determined 
by the types of entries. 

Source statement complexity -- the num- 
ber of symbols, characters, operators, de- 
limiters, references to length attributes, 
self-defining terms, literals, and expres- 
sions appearing in a source statement -- 
determines whether or not the source state- 
ment can be successfully processed. 


(14, 12) 
set up base register 


13, SVAREA+4 
15,SVAREA 
15,8(13) 
13,15 


name, (V1,V2,V3),VL 


13, SVAREA+4 

(14,12) 
SVAREA 18F'0! 

(data) 

(data) 

(data) 


This is an example of OS linkage convention. See the publication Supervisor and Data Management Services for details. 


The symbol used for "name" in this statement is: 


a. The name of a subroutine or function, when the linkage is to a FORTRAN-written subprogram. 


b. The name defined by the following COBOL statements in the procedure division: 


ENTER LINKAGE, ENTRY'name'. 


c. The.name of a CSECT or START statement, or a name used in the operand field of an ENTRY statement in an assembler subprogram. 


The order in which the parameter list is written must reflect the order in which the called subprogram expects the argument. If the called routine is a 
FORTRAN written function, the returned argument is not in the parameter list: a real or double precision function returns the value in floating point 


register zero; an integer function retums the value in general purpose register zero, 


CAUTION: When linking to FORTRAN-written subprograms, consideration must be given to the storage requirements of IBCOM (FORTRAN execution-time 
| 1/O and interrupt handling routines) which accompanies the compiled FORTRAN subprogram, In some instances the call for IBCOM is not automatically 
generated during the FORTRAN compilation, The FORTRAN IV Library publication provides information about IBCOM requirements and assembler state- 


ments used to call IBCOM., 


FORTRAN - written subprograms and FORTRAN library subprograms allow variable-length parameter lists in linkages which call them; therefore all linkages 
to FORTRAN subprograms are required to have the high-order bit in the last parameter in the linkage set to 1, COBOL-written subprograms have fixed- 
length calling linkages; therefore, for COBOL the high-order bit in the last parameter need not be set to 1. 


Bai. : 
This statement reserves the save area needed by the called subprogram. When control is passed to the subprogram, register 13 contains the address of this 
area, 


456 When linking to a FORTRAN or COBOL subprogram, the data formats declared in these statements are determined by the data formats required by 


the FORTRAN or COBOL subprograms, 


MFigure 5. Linkage Statements 
DICTIONARIES USED IN CONDITIONAL ASSEMBLY 
AND MACRO INSTRUCTION EXPANSION 


To accomplish macro instruction expansion 
and conditional assembly, the assembler 
constructs a general dictionary consisting 
of two parts: one global dictionary for 
the entire program, and an area for all of 
the local dictionaries. 

The global dictionary contains one en- 
try for each machine operation code, ex- 
tended mnemonic operation code, assembler 
operation code, macro instruction, and 
global SET variable symbol. 

The local dictionary area consists of 
one local dictionary for each different 





macro definition in the program, and one 
local dictionary for the main portion of 
the program (those statements not within 
a macro definition, also called "open 
code."). The contents of the local dic- 
tionaries are described in subsequent 
paragraphs. 

The capacity of the general dictionary 
(global dictionary and all local diction- 
aries) is up to 64 blocks of 1024 bytes 
each. The division of the dictionary into 
global and local sections is done dynami- 
cally: as the global dictionary becomes 
larger, it occupies blocks taken from the 
local dictionary area. Thus, the global 
dictionary is always core resident. As it 
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expands into the local dictionary area, 
the local dictionaries may overflow onto 

a utility file. The size of the diction- 
aries in core depends upon core avail- 
ability. The minimum core allocation is 
three blocks for the global dictionary and 
two blocks for each local dictionary. 

Each block in the global and local 
dictionaries contains complete entries. 
Any entry not fitting into a block is 
placed in the next block; the remaining 
bytes in the current block are not used. 

The global and local dictionaries take 
two forms: one when the dictionary entries 
are collected, i.e., picked up during the 
initial scan of the source program, and 
one during the actual conditional assembly 
and macro generation, i.e., generation 
time. The following text describes the 
global and local dictionaries at both 
collection time and generation time. 


Global Dictionary at Collection Time 


One global dictionary is built for the 
entire program. It contains machine 
operation codes, extended mnemonic opera- 
tion codes, assembler operation codes, 
macro instruction mnemonics, and global 
SET variable symbols. One entry is made 
for each. The size of each type of entry 
is shown in Table 5. 


Table 5. Global Dictionary Entries at 


Collection Time 


kk . 
Each machine operation code 5 bytes plus mnemonic* 


Each extended mnemonic operation 

< ee : 
code or assembler operation 6 bytes plus mnemonic* 
Each macro mnemonic operation code | 10 bytes plus mnemonic* 
Each global SET variable symbol 6 bytes plus name* 


*One byte is used for each character in the name or mnemonic. 







**For the first two types of entries, a total of 
O6FE) 4 (1790}q) bytes of core is required. 


Fixed overhead for this dictionary is 
8 bytes for the first block 
4 bytes for each succeeding block 
5 bytes for the last block. 
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Local Dictionaries at Collection Time 


For the main portion of the program (those 
statements not within a macro definition), 
one local dictionary is constructed in 
which ordinary symbols, sequence symbols, 
and local SET variable symbols are entered. 
In addition, one local dictionary is con- 
structed for each different macro defini- 
tion in the program. These local diction- 
aries contain one entry for each local SET 
variable symbol, sequence symbol, and 
prototype symbolic parameter declared 
within the macro definition. If a sequence 
symbol is defined before it is referenced, 
an extra entry for the symbol is made. 
Table 6 shows the size of each type of 
entry. 


Table 6. Local Dictionary Entries at 


Collection Time 


a 
Each prototype symbolic parameter 


Each ordinary symbol 
appearing in the main portion 
of the program. 





















10 bytes plus name* 


*One byte is used for each character in the name or mnemonic. 


Fixed overhead for this dictionary is 
8 bytes for the first block (if in the 
main program) 
32 bytes for the first block (if ina 
macro definition) 
4 bytes for each succeeding block 
5 bytes for the last block 


Global Dictionary at Generation Time 


The sizes of the global dictionary entries 
at generation time are shown in Table 7. 


Table 7. Global Dictionary Entries at 


Generation Time 


Each macro mnemonic operation code 
Each global SETA symbol (dimensioned){ 1 byte plus 4N* 
4 bytes 


(undimensioned) 
1 byte plus (N/8)* (N/8 is 
rounded to the next highest 
integer) 


Each global SETB symbol 1 bit 
(undimensioned) 
Each global SETC symbol 
(dimensioned) 1 byte plus 9N* 
Each global SETC symbol 

9 bytes 


(undimensioned) 
Fixed overhead for this dictionary is 
4 bytes plus word alignment. 















Each global SETB symbol (dimensioned) 











*N = dimension 


Local Dictionaries at Generation Time 


Table 8 shows the sizes of the various 
entries appearing in the local dictionaries 
at generation time. 


Table 8. Local Dictionary Entries at 


Generation Time. 


a 
(undimensioned) 4 bytes 
Each local SETB symbol (dimensioned) | 1 byte plus (N/8)* (N/8 is 


rounded to the next highest 
inte ger) 


Each local SETB symbol 1 bit 
(undimensioned) 
Each local SETC symbol(dimensioned) | 1 byte plus 9N* 


Each local SETC symbol 
(undimensioned) 9 bytes 


Each ordinary symbol 
appearing in the main portion 
of the program. ** 

















*N=dimension 
**These entries appear only in the main 
program local dictionary. 


Fixed overhead for this dictionary is 
20 bytes plus word alignment. 


Additional Dictionary Requirements 


The generation time global dictionary and 
the generation time local dictionary for 
the main portion of the program must be 
resident in main storage. 

In addition, if the program contains any 
macro instructions, main storage is re- 
quired for the largest local dictionary of 
the macro definitions being processed. 
Furthermore, during processing of macro 
definitions containing inner macro instruc- 
tions, main storage is required for the 
generation time local dictionaries for the 
inner macro instructions contained within 
the macro definition. 

In addition to those requirements speci- 
fied for the local dictionary of the main 
portion of the program, each macro defini- 
tion local dictionary requires space for 
entries shown in Table 9. 


Table 9. 


Macro Definition Local 
Dictionary Parameter Table 


Each character string (1) 
Each hexadecimal, binary, decimal, oud al 
and character self-defining term (2) 7 bytes plus L 


L Length of BCD entry in bytes 

Number of entries in sublist 

E| +Eg + Ext Sela E. 

where E = size of an entry (formats 1,2, and 3 above) 











<Z 
ono 


Fixed overhead for the macro definition 
local dictionary parameter table is 22 
bytes. Each nested macro instruction also 
requires space in its local dictionary for 
the following: 

Parameter pointer list 8 bytes plus 2N 
(N = the number 
of operands) 

8 bytes plus 
word alignment 


Pointers to parameter 
pointer list and 
parameter table 


SOURCE STATEMENT COMPLEXITY 


The complexity of a source statement is 
limited both by the macro generator and the 
assembler portions of the assembler. The 
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following topics provide the information 
necessary to determine if statement- 
complexity limitations for either portion 
of the assembler are being exceeded. 


Macro Generation and Conditional Assembly 


Limitation 
For any statement which 


1. Is a conditional assembly statement, 

2. Is a DC or DS statement, 

3. Is an EXTRN statement, 

4. Contains a sequence symbol or a 
variable symbol, 

5. Is not a macro instruction or proto- 
type statement, 


the total number of explicit occurrences of 


l. Ordinary symbols (includes machine 
mnemonics, assembler mnemonics, con- 
ditional assembly mnemonics, and macro 
instruction mnemonics), 

2. Variable symbols, 

3. Sequence symbols, 


must not exceed 50 for the entire state- 
ment. 

For macro instructions and prototype 
statements the number of occurrences of 
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ordinary symbols, variable symbols, and 
sequence symbols must not exceed 50 in the 
name and operation fields combined; or in 
each operand unless the operand is a sub- 
list, in which case the limit is applied 

to each sublist operand. In any operand if 
a character string has the same form as a 
symbol, it is counted as a symbol. 


Examples of Counts: 


&B2 SETB (T'NAME EQ ’W’)' count=3 (&B2,SETB, NAME) 
EXTRN A,B,C,&C count=5 (EXTRN,A, B,C, &C) 


Assembler Portion Limitations 


1. Generated statements may not exceed 236 
characters. Statement length includes 
name, operation, operand, and comments. 
If a comments field exists, the blank 
separating the operand and comments 
field is included in the statement 
length. The statement is truncated if 
it exceeds 236 characters. 

2. DC, DS, DXD, and literal DCs cannot 
contain more than 32 operands per 
statement. 


Code 


[EUOOL] 


C[EU002 


[EU003 


C[EU004 
[EU005 


[EU006 


(EU007 


7EU008 


‘EU009 


“EU010O 


“7EU011 


‘EU012 


‘-EU013 


‘EU014 


Message 


DUPLICATION FACTOR 
ERROR 


RELOCATABLE DUPLI- 
CATION FACTOR 


LENGTH ERROR 


RELOCATABLE LENGTH 
S-TYPE CONSTANT IN 
LITERAL 


INVALID ORIGIN 


LOCATION COUNTER 
ERROR 


INVALID DISPLACEMENT 


MISSING OPERAND 


INCORRECT REGISTER 
SPECIFICATION 


SCALE MODIFIER ERROR 


RELOCATABLE SCALE 
MODIFIER 


EXPONENT MODIFIER 
ERROR 


RELOCATABLE EXPONENT 
MODIFIER 


APPENDIX A. 


Explanation 


A duplication factor is not an absolute 
expression, or is zero in a literal: * in 
duplication factor expression; invalid syntax 
in expression. 


A relocatable expression has been used to 
specify the duplication factor. 


The length specification is out of permissible 
range or specified invalidly; * in length 
expression: invalid syntax in expression: no 
left-parenthesis delimiter for expression. 


A relocatable expression has been used to 
specify length. 


_Self-explanatory. 


The location counter has been reset to a value 
less than the starting address of the control 
section; ORG operand is not a simply relocatable 
expression or specifies.an address outside the 
control section. 


The location counter has exceeded ee or 
passed out of control section in negative 
direction (3 byte arithmetic). 


The displacement in an explicit address is not 
an absolute value within the range of 0 to 4095. 


Self-explanatory 


The value specifying the register is not an 
absolute value within the range 0-15, an odd 
register is specified where an even register 
is required, or a register was used where none 
can be specified. 


The scale modifier is not an absolute express- 
ion or is too large, negative scale modifier for 
floating point, * in scale modifier expression; 
invalid syntax or illegally specified scale 
modifier. 


A relocatable expression has been used to 
specify the scale modifier. 


The exponent is not specified as an absolute 
expression or is out of range; * in exponent 
modifier expression; invalid syntax; illegally 
specified exponent modifier. 


A relocatable expression has been used to 


specify the exponent modifier. 
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DIAGNOSTIC MESSAGES 


Severity 
Code 


12 


12 


12 


12 


12 


12 


12 
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Code 


IEUO15 


IEU016 


IEU017 


IEUO018 


IEUO19 


IEU020 


IEU021 


TEU022 


IEU023 


IEU024 


IEU025 


IEU026 


IEU027 


ITEU028 
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Message 
INVALID LITERAL USAGE 


INVALID NAME 


DATA ITEM TOO LARGE 


INVALID SYMBOL 


EXTERNAL NAME ERROR 


INVALID IMMEDIATE 
FIELD 


SYMBOL NOT 
PREVIOUSLY DEFINED 


ESDTABLE OVERFLOW 


PREVIOUSLY DEFINED 
NAME 


UNDEFINED SYMBOL 


RELOCATABILITY 
ERROR 


TOO MANY LEVELS OF 
PARENTHESES 


TOO MANY TERMS 


REGISTER NOT USED 


Severity 
Code 


Explanation 


A valid literal is used illegally, e.g., it 8 
specifies a receiving field or a register, 
or it is a Q-type constant. 


A name entry is incorrectly specified, e.g., 8 
it contains more than 8 characters, it does 

not begin with a letter, or has a special 

character imbedded. 


The constant is too large for the data type 8 
or for the explicit length; operand field 

for packed DC exceeds 32 characters and for 

zoned DC exceeds 16 characters (excluding 

decimal points). 


The symbol is specified invalidly, e.g., it 8 
is longer than 8 characters. 


A CSECT and DSECT statement have the same 8 
name, or a symbol is used more than once in 
an EXTRN or the name field of DXD statements. 


The value of the immediate operand exceeds 8 
255, or the operand requires more than one 
byte of storage. 


Self-explanatory. 8 


The combined number of control sections and 12 
dummy sections plus the number of unique 

symbols in EXTRN statements and V-type con- 

stants exceeds 255. (A DSECT which appears 

as XD makes two entries). 


The symbol which appears in the name field has 8 
appeared in the name field of a previous 

statement. 

A symbol being referenced has not been defined 8 


in the program. 


A relocatable or complex relocatable expression 8 
is specified where an absolute expression is 

required, an absolute expression or complex 
relocatable expression is specified where a 
relocatable expression is required, or a reloca- 

table term is involved in multiplication or 

division. 


An expression specifies more than 5 levels of 12 
parentheses. 


More than 16 terms are specified in an 12 
expression. 
A register specified in a DROP statement is not 4 


currently in use. 


Code 
IEU029 


ITEU030 


ITEU031 


IEU032 


TEU033 


IEU034 


IEU035 


IEU0 36 


IEU037 


IEU038 


IEU039 


IEU040 


ITEU041 


IEU042 


IEU043 


TEU044 


Message 
CCW ERROR 


INVALID CNOP 
UNKNOWN TYPE 
OP-CODE NOT ALLOWED 


TO BE GENERATED 


ALIGNMENT ERROR 


INVALID OP-CODE 


ADDRESSABILITY ERROR 


(No message is 
assigned to 
this number) 


MNOTE STATEMENT 


ENTRY ERROR 


INVALID DELIMITER 


GENERATED RECORD 
TOO LONG 


UNDECLARED VARIABLE 
SYMBOL 


SINGLE TERM LOGICAL 
EXPRESSION IS NOT 
A SETB SYMBOL 


SET SYMBOL 


PREVIOUSLY DEFINED 


SET SYMBOL USAGE 
INCONSISTENT WITH 
DECLARATION 


Severity 


Explanation Code 
Bits 37-39 of the CCW are set to non-zero. 8 
An invalid combination of operands is 12 
specified. 
Incorrect type designation is specified in a 8 
DC, DS, or literal. 
Self-explanatory. 8 
Referenced address is not aligned to the proper 4 
boundary for this instruction, e.g., START 
operand not a multiple of 8. 
Syntax error, e.g., more than 5 characters in 8 
operation field, not followed by blank on first 
card, missing. 
The referenced address does not fall within the 8 


range of a USING instruction. 





This indicates that an MNOTE statement has been Variable 
generated from a macro definition. The text and 

severity code of the MNOTE statement will be 

found in line in the listing. 


A symbol in the operand of an ENTRY statement 8 
appears in more than one ENTRY statement, it is 
undefined, it is defined in a dummy section or 

in blank common, or it is equated to a symbol 

defined by an EXTRN statement. 


This message can be caused by any syntax error, 12 
e.g., missing delimiter, special character used 

which is not a valid delimiter, delimiter used 
illegally, operand missing, i.e., nothing 

between delimiters, unpaired parentheses, 

imbedded blank in expression. 


There are more than 236 characters in a 12 
generated statement. 


Variable symbol is not declared in a defined SET 8 
symbol statement or in a macro prototype. 


The single term logical expression has not been 8 
declared as a SETB symbol. 


Self-explanatory. 8 


A SET symbol has been declared as undimensioned, 8 
but is subscripted, or has been declared 
dimensioned, but is unsubscripted. 
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Code 





TEU045 


IEU046 


IEU047 


ITEU048 


IEU049 


ITEU050 


TEU051 


ITEU052 


IEU053 


IEU054 


TEU055 


IEU056 


IEU057 


IEU058 


IEU059 


TEU060 
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Message 


ILLEGAL SYMBOLIC 
PARAMETER 


AT LEAST ONE RELOCAT- 
ABLE Y TYPE CONSTANT 
IN ASSEMBLY 


SEQUENCE SYMBOL 
PREVIOUSLY DEFINED 


SYMBOLIC PARAMETER 
PREVIOUSLY DEFINED OR 


SYSTEM VARIABLE SYMBOL 


DECLARED AS SYMBOLIC 
PARAMETER 


VARIABLE SYMBOL 
MATCHES A PARAMETER 


INCONSISTENT GLOBAL 
DECLARATIONS 


MACRO DEFINITION 
PREVIOUSLY DEFINED 


NAME FIELD CONTAINS 
ILLEGAL SET SYMBOL 


GLOBAL DICTIONARY 
FULL 


LOCAL DICTIONARY FULL 
INVALID ASSEMBLER 
OPTION (S) ON THE 
EXECUTE CARD 
ARITHMETIC OVERFLOW 


SUBSCRIPT EXCEEDS 
MAXIMUM DIMENSION 


RE-ENTRANT CHECK 
FAILED 


UNDEFINED SEQUENCE 
SYMBOL 


ILLEGAL ATTRIBUTE 
NOTATION 


Severity 
Explanation Code 


An attribute has been requested for a variable 


symbol which is not a legal symbolic parameter. 8 
Self-explanatory. 4 
Self-explanatory. | 12 
Self-explanatory. 12 
Self-explanatory. 12 
A global SET variable symbol, defined in more 8 


than one macro definition or defined in a 
macro definition and in the source program, is 
inconsistent in SET type or dimension. 


Prototype operation field is the same as a 12 
machine or assembler instruction or a previous 
prototype. 


SET symbol in name field does not correspond 8 
to SET statement type. 


The global dictionary is full, assembly 12 
terminated. 
The local dictionary is full, current macro 12 


aborted. If in open code, assembly terminated, 


Self-explanatory. 8 


The intermediate or final result of an express- 8 
ion is not within the range of -231 to 231-1. 


&SYSLIST or symbolic parameter subscript exceeds 8 
200, or is negative, or zero, or SET symbol 
subscript exceeds dimension. 


An instruction has been detected, which, when 4 
executed, might store data into a control section 

or a common area. This message is generated only 
when requested via control cards and merely 

indicates a possible re-entrant error. 


Self-explanatory. 12 
L', S', or I' requested for a parameter whose 8 


type attribute does not allow these attributes 
to be requested... 


Code 





ITEU061 


ITEU062 


IEU063 


TEU064 


ITEU065 


ITEU066 


IEU067 


IEU068 


ITEU069 


IEU070 


IEUO71 


ITEU072 


IEU073 


IEU074 


Message 
ACTR COUNTER EXCEEDED 


GENERATED STRING 
GREATER THAN 255 
CHARACTERS 


EXPRESSION 1 OF SUB- 
STRING IS ZERO OR 
MINUS 


EXPRESSION 2 OF SUB- 
STRING IS ZERO OR 
MINUS 


INVALID OR ILLEGAL 
TERM IN ARITHMETIC 
EXPRESSION 


UNDEFINED OR DUP- 
LICATE KEYWORD 
OPERAND OR EXCESSIVE 
POSITIONAL OPERANDS 


EXPRESSION 1 OF SUB- 
STRING GREATER THAN 
LENGTH OF CHARACTER 
EXPRESSION 


GENERATION TIME 
DICTIONARY AREA 
OVERFLOWED 


VALUE OF EXPRESSION 
2 OF SUBSTRING 
GREATER THAN 8 


FLOATING POINT 
CHARACTERISTIC OUT 
OF RANGE 


ILLEGAL OCCURRENCE 
OF LCL, GBL, OR 
ACTR STATEMENT 


ILLEGAL RANGE ON 
ISEQ STATEMENT 


ILLEGAL NAME FIELD 


ILLEGAL STATEMENT 
IN COPY CODE OR 
SYSTEM MACRO 


Explanation 
Self-explanatory. 


Self-explanatory. 


Self-explanatory. 


Self-explanatory. 


The value of a SETC symbol used in the arith- 
metic expression is not composed of decimal 
digits, or the parameter is not a self-defining 
term. 


The same keyword operand occurs more than once 
in the macro instruction; a keyword is not 
defined in a prototype statement; in a mixed 
mode macro instruction, more positional 
operands are specified than are specified in 
the prototype. 


Self-explanatory. 


See Dictionary Size and Source Statement 
Complexity. 


Self-explanatory. 


Self-explanatory. 


LCL, GBL, or ACTR statement is not in proper 
place in the program. 


Self-explanatory. 


Either a statement which requires a name has 
been written without a name, or a statement 
has a name which is not allowed to have a name. 


Self-explanatory. 
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Code 





ITEU075 


IEU076 


IEU077 


IEU078 


IEU079 


ITEU080 


IEU081 


IEU082 


IEU083 


IEU084 


IEU085 


IEU086 


TEU087 


IEU088 


IEU089 
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Message 


ILLEGAL STATEMENT 
OUTSIDE OF A MACRO 
DEFINITION 


SEQUENCE ERROR 


ILLEGAL CONTINUATION 
CARD 


(No message is 
assigned to this 
number ) 


ILLEGAL STATEMENT 
IN MACRO DEFINITION 


ILLEGAL START CARD 


ILLEGAL FORMAT IN 
GBL OR LCL STATE- 
MENTS 


ILLEGAL DIMENSION 
SPECIFICATION IN GBL 
OR LCL STATEMENT 


SET STATEMENT NAME 
FIELD NOT A VARIABLE 
SYMBOL 


ILLEGAL OPERAND FIELD 
FORMAT 


INVALID SYNTAX IN 
EXPRESSION 


ILLEGAL USAGE OF 
SYSTEM VARIABLE 
SYMBOL 


NO ENDING APOSTROPHE 


UNDEFINED CODE 


INVALID ATTRIBUTE 
NOTATION 


Explanation 


Self-explanatory. 


Self-explanatory. 
Either there are too many continuation cards, 


or there are non-blanks between the begin and 
continue columns on the continuation card. 


This operation is not allowed within a macro 
definition. 


Statements affecting or depending upon the 
location counter have been encountered before 
a START statement. 


An operand is not a variable symbol. 
Dimension is other than 1 to 255. 
Self-explanatory. 


Syntax invalid, e.g., AIF statement operand 


does not start with a left parenthesis; operand 


of AGO is not a sequence symbol; operand of 
PUNCH, TITLE, MNOTE not enclosed in quotes. 


Invalid delimiter, 
too many levels of parentheses, two operators 
in succession, two terms in succession, or 
illegal character. 


A system variable symbol appears in the name 
field of a SET statement, is used in a mixed 
mode or keyword macro definition, is declared 


in a GBL or LCL statement, or is an unsubscripted 


&SYSLIST in a context other than N'&SYSLIST. 


There is an unpaired apostrophe or ampersand in 


the statement. 
Self-explanatory. 
Syntax error inside a macro definition, e.g., 


the argument of the attribute reference is not 
a symbolic parameter. 


too many terms in expression, 


Severity 
Code 


8 


12 


12 


Code 





IEU090 


ITEU09L 


TIEU092 


IEU093 


ITEU094 


TEU095 


IEU096 


IEU097 


IEU098 


IEU099 


Message 


INVALID SUBSCRIPT 


INVALID SELF-DEFINING 
TERM 


INVALID FORMAT FOR 
VARIABLE SYMBOL 


UNBALANCED PAREN~ 
THESIS OR EXCESSIVE 
LEFT PARENTHESES 


INVALID OR ILLEGAL 
NAME OR OPERATION IN 
PROTOTYPE STATEMENT 


ENTRY TABLE OVERFLOW 


MACRO INSTRUCTION OR 
PROTOTYPE OPERAND 
EXCEEDS 255 CHARAC- 
TERS IN LENGTH 


INVALID FORMAT IN 
MACRO INSTRUCTION 
OPERAND OR PROTOTYPE 
PARAMETER 


EXCESSIVE NUMBER OF 
OPERANDS OR PARAM- 
ETERS 


POSITIONAL MACRO 
INSTRUCTION OPERAND, 
PROTOTYPE PARAMETER 
OR EXTRA COMMA 
FOLLOWS KEYWORD 


Explanation 


Syntax error, e.g., double subscript where 
Single subscript is required or vice versa; 
not right parenthesis after subscript. 


Value is too large or is inconsistent with the 


data type, e.g., severity code greater than 255. 


The first character after the ampersand is not 


alphabetic, or the variable symbol contains 
more than 8 characters. 


Self-explanatory. 


Self-explanatory. 


Number of ENTRY symbols, 


i.e., ENTRY instruc- 


tion operands, exceeds 100. 


Self-explanatory. 


This message can be caused by: 


1. 
2. 


Illegal "=". 

A single "&" appears somewhere in the 
standard value assigned to a prototype 
keyword parameter. 

First character of a prototype parameter 
is not "&", 

Prototype parameter is a subscripted 


‘variable symbol. 


Invalid use of alternate format in proto- 


type statement, e.g., 
10 16 72 
PROTO &A,&B, 
or 
PROTO &A,&B, X 
&C 


Unintelligible prototype parameter, e.g., 
"GA*" or "“S&A&E." 
Illegal (non-assembler) character appears 


“Th prototype parameter or macro-instruction 


operand. 


Either the prototype has more than 200 param- 
eters, or the macro instruction has more than 
200 operands. 


Self-explanatory. 
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Code 


8 


12 


12 


12 


12 
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Code 





IEU100 


IEU1O1 


IEU102 


IEU103 


IEU104 


IEU105 


IEU106 


IEU107 


IEU108 


IEU109 


IEU110 


TEU111 


IEU112 


IEU997 


IEUI98 


IEU999 
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Message 


STATEMENT COMPLEXITY 
EXCEEDED 


EOD ON SYSIN 


INVALID OR ILLEGAL 
ICTL 


ILLEGAL NAME IN 
OPERAND FIELD OF 
COPY CARD 


COPY CODE NOT FOUND 


EOD ON SYSTEM MACRO 
LIBRARY 


NOT NAME OF DEECT 
OR DXD 


INVALID OPERAND 


PREMATURE EOD 


PRECISION LOST 


EXPRESSION VALUE 
TOO LARGE 


SYSGO DD CARD MISSING 
NOLOAD OPTION USED 


SYSPUNCH DD CARD 
MISSING NODECK OPTION 
USED 


SYSPRINT DD CARD 
MISSING NOLIST OPTION 
USED 


ASSEMBLY TERMINATED. 
MISSING DATA SET FOR 
(ddname) 


ASSEMBLY TERMINATED. 
PERMANENT I/O ERROR 
ON (ddname) 


Explanation 


More than 32 operands in a DC, DS, DXD, or 
literal DC, or more than 50 terms in a statement. 


EOD before END card. 


The operands of the ICTL are out of range, or 
the ICTL is not the first statement in the 
input deck. 


Syntax error, e.g., symbol has more than 8 
characters or has an illegal character. 


The operand of a COPY statement specified 
COPY text which cannot be found in the library. 


EOD before MEND card. 
Self-explanatory. 


Invalid syntax in DC operand, e.g., invalid 
hexadecimal character in hexadecimal DC; 
operand string too long for X, B, C, DC's; 
operand unrecognizable, contains invalid value, 
or incorrectly specified. 

Indicates an internal assembler error; should 
not occur. 


Self-explanatory. 


Value of expression greater than ~-16777216 to 
+16777215. 


Expressions in EQU and ORG statements are 
flagged if (1) they include terms previously 
defined as negative values, or (2) positive 
terms give a result of more than three bytes 
in magnitude. The error indication may be 
erroneous due to (1) the treatment of negative 
values as three-byte positive values, or (2) 
the effect of large positive values on the 
location counter if a control section begins 
with a START statement having an operand greater 
than zero, or a control section is divided 
into subsections. 


Self-explanatory. 


Self-explanatory. 


Self~-explanatory. Printed on console typewriter. 


Printed on console typewriter. 


Self-explanatory. 


Self-explanatory. Printed on console typewriter. 


Severity 
Code 


8 


12 


16 


12 


12 


12 


16 


16 


16 


20 


20 


TEXT (TXT) CARD FORMAT 


The format of the TXT cards is as follows: 


Columns Contents 

1 12-2-9 punch 

2-4 TXT 

5 Blank 

6-8 Relative address of first 
instruction on card 

9-10 Blank 

11-12 Byte count -- number of 
bytes in information 
field (cc 17-72) 

13-14 Blank 

15-16 ESDID 

17-72 56-byte information field 

73-76 Deck ID (from first TITLE 
card) 

77-80 Card sequence number 


RLD CARD FORMAT 


The format of the RLD card is as follows: 


Columns Contents 
1 12-2-9 punch 
2-4 RLD 
5-10 Blank 
11-12 Data field count -- number 
of bytes of information in 
data field (cc 17-72) 
13-16 Blank 
17-72 Data field: 
17-18 Relocation ESDID 
19-20 Position ESDID 
21 Flag byte 
22-24 Absolute address to be 
relocated 
25-72 Remaining RLD entries 
73-76 Deck ID (from first TITLE 
card) 
77-80 Card sequence number 


If the rightmost bit of the flag byte is 
set, the following RLD entry has the 
same Relocation ESDID and Position ESDID, 
-and this information will not be repeated; 
if the rightmost bit of the flag byte is 
not set, the next RLD entry has a different 
Relocation ESDID and/or Position ESDID, 
and both ESDIDs will be recorded. 

For example, if the RLD Entries l, 2, 
and 3 of the program listing (Appendix C) 
contain the following information: 


Pos. Rel. 
ESDID ESDID Flag Address 
Entry 1 02 04 OC 000100 
Entry 2 02 04 0c 000104 
Entry 3 03 01 oc 000800 


Column: 


Form C26-3756-2 
Page Revised 11/15/67 
By TNL N26 -0567 


APPENDIX B. OBJECT DECK OUTPUT 


Columns 17-36 of the RLD card would ap- 
pear as follows: 






17 18 19 20 21 22 23 24/25 26 27 28129 30 31 32 33 34 35 36137——= 72 


| oofo4oofo2[oof oofoi]oofoc] cof aifosfoofor}oofosfoc]oofosfoo] | 
| uu | —_,— 
ESD ID's Address blanks 






Address ESD ID's Address 





Flag Flag Flag 
(set) (not (not 
set) set) 


ESD CARD FORMAT 


The format of the ESD card is as follows: 


Columns Contents 
1 12-2-9 punch 
2-4 ESD 
5-10 Blank 
11-12 Variable field count -- 
number of bytes of informa- 
tion in variable field 
(cc 17-64) 
13-14 Blank 
15-16 ESDID of first SD, XD, CM, 
PC, or ER in variable field 
17-64 Variable field. One to 
three 16—-byte items of the 
following format: 
8 bytes -- Name, padded 
with blanks 
l byte -- ESD type code 
3 bytes -- Address 
l byte -- Alignment if XD; 
otherwise blank 
3 bytes -- Length, LDID, or 
blank 
65-72 Blank 
73-76 Deck ID (from first TITLE 
card) 
77-80 Card sequence number 


END CARD FORMAT 


The format of the END card is as follows: 


Columns Contents 
1 12-2-9 punch 
2-4 END 
5 Blank 
6-8 Entry address from operand 


of END card in source deck 
(blank if no operand) 
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9-14 Blank 

15-16 ESDID of entry point (blank 
if no operand) 

17-72 Blank 

73-76 Deck ID (from first TITLE 
card) 

77-80 Card sequence number 


TESTRAN (SYM) CARD FORMAT 


If requested by the user, the assembler 
punches out symbolic information for TES-— 
TRAN concerning the assembled program. 
This output appears ahead of all loader 


text. The format of the card images for 
TESTRAN output is as follows: 
Columns Contents 
1 12-2-9 punch 
2-4 SYM 
5-10 Blank 
11-12 Variable field count -- 
number of bytes of text in 
variable field (cc 17-72) 
13-16 Blank 
17-72 Variable field (see below) 
73-76 Deck ID (from first TITLE 
card) 
77-80 Card sequence number 


The variable field (columns 17-72) con- 
tains up to 56 bytes of TESTRAN text. The 
items making the text are packed together, 
consequently only the last card may con- 
tain less than 56 bytes of text in the 
variable field. The formats of a text 
card and an individual text item are shown 
in Figure 6. The contents of the fields 
within an individual entry are as follows: 


Ly Organization (1 byte) 


Bit O: 
0 = non-data type 
1 = data type 
Bits 1-3 (if non-data type): 
000 = space 
001 = control section 
010 = dummy control section 
011 = common 
100 = instruction 
101 = CCW 


30 


Bit 1 (if data type): 

0 no multiplicity 
multiplicity (indicates 
presence of M field) 
Bit 2 (if data type): 

0 = independent (not a 
packed or zoned decimal 
constant) 

1 = cluster (packed or 
zoned decimal constant) 

Bit 3 (if data type): 
0 = no scaling 


1 


tt 


1 scaling (indicates pres- 
ence of S field) 
Bit 4: 
0 = name present 
1 = name not present 
Bits 5-7: 
Length of name minus one 
Z. Address (3 bytes) - displacement from 


base of control section 
3. symbol Name (0-8 bytes) = symbolic 
name of particular item 


NOTE: The following fields are only pres- 
ent for data-type items. 


4. Data Type (1 bvte) - contents in hex- 
adecimal 

character 

hexadecimal 

08 -: binary 


10 = fixed point, full 

14 = fixed point, half 

18 = floating point, short 
1c = floating point, long 
20 = A-type or Q-type data 
24 = Y-type data 

28 = S-type data 

2C = V-type data 

30 = packed decimal 

34 = zoned decimal 


5. Length (2 bytes for character, hexa- 
decimal, or binary items; 1 byte for 
other types) - length of data item 
minus 1 

6. Multiplicity - M field (3 bytes) - 
equals 1 if not present 

Ve Scale - signed integer - S field (2 
bytes) - present only for F, H, E, D, 
P and Z type data, and only if scale 
is non-zero. 


1 2 45 10 11:12 13 16 17 72 73 76 77 80 






Sequence 
Number 





TESTRAN text - packed entries 

















Entry 
(complete or 
head portion) 


Entry 
(complete or 
end portion) 





N complete entries 
N 2 1 







Variable size entries 






Mult. 
Address Symbol Name type | Length 
3 2 


Figure 6. TESTRAN SYM Card Format 
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APPENDIX C. ASSEMBLER F PROGRAM LISTING 


The Assembler F listing shown in The Assembler Listing, the headings 

this appendix results from assembling on the listing are numbered. 

the source program documented in an Since there were no errors in the 
appendix to the Assembler Language publi- assembly, a diagnostic list was not pro- 
cation. For easy reference to the duced. Each of the following pages repre- 
explanations that appear in the section sents one printer-producede listing page. 


EXAM @) ® ® © © EXTERNAL SYMBOL DICTIGNARY PAGE 1 


SYMBOL TYPE ID ADDR LENGTH LD ID 00-16 4/11/66 


SAMPLER Sv 61 000000 000388 
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EXAM PAGE 1 


Om W ® ® © ©® 


LOC OBJECT COOE ADORI ADDR2 STMT SOURCE STATEMENT F L14FEB66 4/11/66 


THIS IS THE EXECUTABLE SAMPLE PROGRAM SHOWN IN THE SRL — * 
2 ** ASSEMBLER LANGUAGE MANUAL. - * 
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@ 


EXAM SAMPLE PROGRAM 


Loc §=«OBVECT CODE 


000000 


ADDR1I ADORZ2 STMT 


SOURCE STATEMENT 


eTYPEDEH 
o¥ 

o* 

* 

&TYPE 


eMOVE 
* 


o* 
om 
«* 
oT YPECGK 
* 


ot 
o* 
o* 
eERRORI 


@ERROR2 
eERRORZ 
eERROR4 
* 
* 


* 


SAMPLR 
BEGIN 


PRINT 


DATA 


THIS IS THE MACRO DEFINITION 


MACRO 
MOVE 


&TC,&FROM 


DEFINE SETC SYMBOL 


LCLC 
CHECK 
AIF 
CHECK 


AIF 
AIF 
AIF 
AIF 
AGO 
ANOP 


GTYPE 

NUMBER OF OPERANDS 
(N'ESYSLIST NE 2).ERRORL 
TYPE ATTRIBUTES OF OPERANDS 


(T*ETO NE T*&FROM).ERROR2 


oF 


PAGE 


F 14FEB66 4/11/66 


(7) samproo2 


SAMPLO93 
SAMPLO04 
SAMPLOOS 
SAMPLO06 
SAMPLOO7 
SAMPLOO8 
SAMPLOO9 
SAMPLOLO 
SAMPLOLI 
SAMPLO12 
SAMPLO13 
SAMPLO14 
SAMPLO1S 
SAMPLO16 
SAMPLO17 
SAMPLO1L8 
SAMPLO19 


(T*&TO EQ *C*® GR T*&TO EQ *G* OR TPETO EQ *K*).TYPECGK SAMPLO20 
(T'ETO EQ *D* OR T*ETO EQ *E* OR T*ETO EQ *H*).TYPEDEH SAMPLO21 


(T*ETO EQ *F*).MOVE 
e ERRORZ 


ASSIGN TYPE ATTRIBUTE TO SETC SYMBOL 


SETC 
ANOP 


T’éTo 


NEXT TWO STATEMENTS GENERATED FOR MOVE MACRO 


LETYPE 


226FROM 


ST&TYPE 22670 


MEXIT 
CHECK 


AIF 


LENGTH ATTRIBUTES OF OPERANDS 


(L°&TG NE L*°&FROM OR L*&TO GT 256).ERRORG 


NEXT STATEMENT GENERATED FOR MOVE MACRO 


MVC 
MEXIT 


ERROR 


MNOTE 
MEXIT 
MNOTE 
MEXIT 
MNOTE 
MEXIT 
MNOTE 
MEND 


&TO,&FROM 


MESSAGES FOR INVALIO MOVE MACRO INSTRUCTIONS 


SAMPLO22 
SAMPLO23 
SAMPLO24 
SAMPLO25 
SAMPLO26 
SAMPLO27 
SAMPLO28 
SAMPLO29 
SAMPLO30 
SAMPLO31 
SAMPLO32 
SAMPLO33 
SAMPLO34 
SAMPLO35 
SAMPLO36 
SAMPLO37 
SAMPLO38 
SAMPLO39 
SAMPLO40 
SAMPLO41 
SAMPLO42 
SAMPL043 


1,*IMPROPER NUMBER OF OPERANDS, NO STATEMENTS GENERATED* SAMPL044 


SAMPL045 


L,*OPERAND TYPES DIFFERENT, NO STATEMENTS GENERATED* SAMPLO46 


SAMPLO47 


1,°IMPROPER OPERAND TYPES, NO STATEMENTS GENERATED® SAMPLO48 


SAMPL049 


1,*IMPROPER OPERAND LENGTHS, NO STATEMENTS GENERATED* SAMPLO50 


MAIN ROUTINE 


CSECT 
SAVE 


(14,12) 09% 


SAMPLO51 
SAMPL052 
SAMPLO53 
SAMPLO54 
SAMPLOSS5 
SAMPLO056 





® 


EXAM SAMPLE PROGRAM PAGE 


Om @® @ @®  @& © 


LUC «UBJECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT F 14FE866 4/11/66 


QOGO000 47FO FOOA O000A 59+B5EGIN 8 10(0-¢15) BRANCH AROUND ID 
000004 05 60+ oc AL1(5) 
000005 C2i5C7C9D5 6l+ oc CL5*BEGING IDENTIFIER 
OOOO0A 9GEC BOOC oa00Cc 62+ STM 14912,12(13) SAVE REGISTERS 
OOQ0GE O5L0 63 BALR R1230 ESTABLISH ADDRESSABILITY OF PROGRAM SAMPLO5S7 
060010 64 USING *,R12 AND TELL THE ASSEMBLER WHAT BASE TO USE SAMPLO58 
000010 500 COBS8 000C8 65 ST 139 SAVE13 SAMPLO59 
000014 9857 C390 CO3A0 66 LM R5eR7Te=AL(LISTAREA,16O,LISTEND) LOAD LEST AREA PARAMETERS SAMPLO60 
000000 67 USING LISTsR5 REGISTER 5 POINTS TO THE LIST SAMPLO61 
000018 45r0 COBE OOGCE 68 BAL R14,SEARCH FIND LIST ENTRY IN TABLE SAMPLOS&2 
O00001C 9180 COBC 69 ™ SWITCH,NONE CHECK TO SEE IF NAME WAS FOUND SAMPL063 
000020 4710 COBO 000co 70 80 NOTTHERE BRANCH IF NOT SAMPLO064 
900000 71 USING TABLEsR1 REGISTER 1 NOW POINTS TO TABLE ENTRY SAMPLO65 
72 MOVE TSWITCH,LSWITCH MOVE FUNCTIONS SAMPLO66 
73+* NEXT STATEMENT GENERATED FOR MOVE MACRO 
000024 0200 1003 5008 00003 60008 74+ MVC TSWITCHs USWITCH. 
75 MOVE TNUMBER,LNUMBER FROM LIST ENTRY SAMPLO67 
T6+* NEXT STATEMENT GENERATED FOR MOVE MACRO 
00002A D262 1000 5009 00000 G0009 71t MYC TNUMBER » LNUMBER 
78 MOVE TADDRESS,L ADDRESS TO TABLE ENTRY SAMPLO68 
T94+* NEXT TwO STATEMENTS GENERATED FOR MOVE MACRO 
000630 5&20 500C 0000C 80+ L 22LADDRESS 
000034 5026 1004 00004 81+ ST 22TADDRESS 
000038 8756 C008 00018 62 LISTLOGP BXLE R5,R6,MORE LOOP THROUGH THE LIST SAMPLO69 
00003C D5EF C240 COFO 00250 00100 83 cic TESTTABL(240) sTABLAREA SAMPLO70 
000042 4770 CO7C 0008C 84 BNE NOTRIGHT SAMPLO71 
000046 B55F C330 C1IEO 00340 O01FO 85 cic TESTLIST(96),LISTAREA SAMPLO72 
O0004C 4770 CO7C ooosc 86 BNE NOTRIGHT SAMPLO73 
87 WTO *ASSEMBLER SAMPLE PROGRAM SUCCESSFUL* SAMPLOT4 
000050 88+ Os4 
000050 4510 CO6C ooo7c 89+ 1,IHBOOO5A BRANCH AROUND MESSAGE 
000054 0027 90+ AL2(1HBO0O005S-#) MESSAGE LENGTH 
000056 0000 91+ AL2(0) 
000058 C1lEZE2C5D4C203C5 92+ C* ASSEMBLER SAMPLE PROGRAM SUCCESSFUL* MESSAGE 
000060 0940E2C1D407D03C5 
000068 4007D9D6C709C 104 
G00070 40b2E4C3C3C5E2E2 
000076 C6E4D3 
000078 93+1HBOO05 EQU * 
oo007c 94+I1HBOOO05A DS OH 
Ooo07C OAZ3 95+ svc 35 ISSUE SVC 
GCOOOTE 58D0 96 EXIT L R13,SAVE13 SAMPLO75 
97 RETURN (14912) ,RC=0 SAMPLO76 
000082 98EC 98+ in 14912312013) RESTORE THE REGISTERS ; 
000086 41F0 99+ LA 15,010,0) LOAD RETURN CODE 
OOOOSA O7FE 100+ BR 14 RETURN 
101 * SAMPLOTT 
102 NOTRIGHT WTO "ASSEMBLER SAMPLE PROGRAM UNSUCCESSFUL* SAMPLO78 
00008C 103+ CNOP 094 
OQ00G8C 4510 COAA 1O4+NOTRIGHT BAL 1,IHBOOO7A BRANCH AROUND MESSAGE 
000030 0029 105+ oc AL2ZUIHBOOOT—-*) MESSAGE LENGTH 
000092 3G0C0 106+ oc AL2(Q) 
000094 ClE2E2C504C203C5 107+ boc C*ASSEMBLER SAMPLE PROGRAM UNSUCCESSFUL* MESSAGE 
Q0009C 0940E2C1040703C5 
OOGOA4 40D07D9D6C7DSC 104 
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EXAM SAMPLE PROGRAM : PAGE 4 


@) @  ® @ 


LGC UBYECT COVE ADDR1 ADOR2 STAT SOURCE STATEMENT F 14FEB66 4/11/66 


QOOOAC 40E4D5E2E4C3C3C5 

000054 EZE2CGE4D2 

000089 108+IHBOOOT EQU * 

OOOOBA 109+1HBOOO07A DS OH 

OQO0OBA OA23 110+ Svc 35 ISSUE SVC 

OOGOBC 47F0 COGE 111 8 EXIT SAMPLOT79 

Q000CO 9680 5008 112 NOTTHERE O1 LSWITCH,NONE TURN ON SWITCH IN LIST ENTRY SAMPLO8O 

O0Q0C4 47FC CO2zu 113 8 LISTLOGP GO BACK AND LOGP SAMPLO81 

oGo000cs 00000000 114 SAVE13 oc For SAMPLO82 

Gooocc OO 215 SWITCH DC x*o0* SAMPLO83 

000080 116 NONE EQU x*80°* SAMPLO84 
117 * SAMPLOB5 
118 * BINARY SEARCH ROUTINE SAMPLO8B6 
119 * SAMPLO8T 

QOoo0oco 

QOOOCcE cosc 120 SEARCH NI SWITCH, 255-NONE TURN OFF NOT FOUND SWITCH SAMPLO88 

000002 C39C 121 LM R1,R3e=F* 128247128" LOAD TABLE PARAMETERS SAMPLO89 

000006 COEO 122 LA Rl» TABLAREA-16(R1) GET ADDRESS OF MIDOLE ENTRY SAMPLO90 

Q0000A e001 123 LOOP SRL R391 DIVIDE INCREMENT BY 2 SAMPLO91 

QooobE 5000 1008 00000 124 cic LNAME » TNAME COMPARE LIST ENTRY WITH TABLE ENTRY SAMPLO92 

QO0OOES COE4% 125 BH HIGHER BRANCH IF SHOULD BE HIGHER IN TABLE SAMPLO93 

0000t48 126 BCR 8yR14 EXIT IF FOUND SAMPLO94 
127 SR R1i»R3 OTHERWISE IT IS LOWER IN THE TABLE XSAMPLO9S5 

QOOOEA SG SUBTRACT INCREMENT : SAMPLO96 

OQOOOKL 128 BCT R2,LO0P LOOP 4 TIMES SAMPLO97 

OOO00FO 129 8 NOTFOUND ARGUMENT IS NOT IN THE TABLE SAMPLO98 

QOOUF4 130 HIGHER AR R1sR3 AOD INCREMENT SAMPLO99 

O000F6 131 BCT R2,L00P LOOP 4 TIMES SAMPL100 

QCOOFA 132 NUTFOUND O1 SWITCH, NONE TURN ON NOT FOUND SWITCH SAMPL101 

O0O00FE 133 BR R14 EXIT SAMPL102 
134 SAMPL103 
135 THIS IS THE TABLE SAMPL104 
136 SAMPL1O5 

000100 137 OS oD SAMPL106 

000100 0000000000000000 138 TABLAREA DC XL8°O* »CLB*ALPHA® SAMPL1O7 

000108 C1030 7C8C1 404040 

000210 00000G0000000000 139 oc XLB°O*,CLE* BETAS SAMPL108 

000118 C2L5E3C140404040 

000126 6000000000000000 140 oc XL8*O*,CLE*DELTA® SAMPLIO9 

000128 C4C0503E3C1404040 

000130 0000000000000000 141 bc XL8°O* sCL8*EPSILON® SAMPL110 

000138 C5D7E2C90306D540 

000140 0000000000000000 142 bc XL8°O* ,CLB"ETA® SAMPLIL1L 

000148 C5E3C 14040404040 

000150 9000000000000000 143 oc XL8*O!,CL8*GAMMA® SAMPL112 

000158 C7C1D4D4C1404046 

000160 0000000000000000 144 boc XL8*O*,Ci8* IOTAS SAMPL113 

000168 C9D6E3C140464040 

000170 0000000000000000 145 oC XL8*"0O*,CL&*KAPPA® SAMPL114 

Q00178 02€010707C1404040 

000180 G000000000000000 146 oc XL8°O* ,CLB8*LAMBDA® SAMPLLIS 

000188 03C1D4C2C4C14040 

000190 0000000000000000 147 oc XL8*0* ,CL8* MUP SAMPL116 

000198 D4E4404040404040 

GOOLAO 0000000000000000 148 oc XL8*0* ,CLE*NU* SAMPL117 
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EXAM SAMPLE PROGRAM PAGE 5 


©) Q® ©® @) 


LOC) «DBVECT CODE ADDR1 ADDR2 STMT SOURCE STATEMENT F 14FEB66 4/11/66 


VOOLAS 05t4404040404040 
0G0ibU COL0OCO0O0GCO0N0 149 oc XL8*#0*,CL8* OMICRON® SAMPL118 
000188 Dév4C9C 3096540 
0001C0 COCG000000000000 150 bc XL8*0* »CL8* PHI® SAMPL119 
000iC& DIL8C94040404040 
000100 UCOCOG0000000000 151 bc XL8*0" ,CLB*SIGMAS SAMPL120 
Q0G1D& E209C70401404040 
0001&0 0006000000000000 152 oc XL8*0*,CLB*ZETA® SAMPL121 
QOOLES £905E630140404040 

SAMPL122 
THIS 1S THE LIST SAMPL123 


153 
154 


* 
* 

155 * SAMPL124 
LISTAREA DC CL8*LAMBDA® ,X*0A*,FL3*29",A( BEGIN) SAMPL125 


OOU1LFUO 03C1D4C204C14040 156 
QO0LFs 0AGO0G1D00000000 
C0OG200 £905E3C140404040 157 oc CLB*ZETA® sX*05% g FL3°5* gA( LOOP) SAMPL126 
0002Q8 05000005000000DA 
000210 £3C08C5E3C1404040 158 oc CLE*THETA® »X*° 02% FL 3°45*,A( BEGIN) SAMPLI27 
000216 0206602000000000 
000220 E301b44040404040 159 DC CLE* TAU® 9 X*00" sFL3°0%, ALL) SAMPL128 
000228 0€000C0000000001 
000230 0309E2E340404040 160 oc CLB*LIST" gX*1LF* FL3°465%,A10) SAMPL129 
000238 1F00C10100000000 
0G0240 C1L5D708C1464040 161 LISTEND OC CLB* ALPHA® 4 X*00* gFL3°1" sA(123) SAMPL130 
000248 0000C00100000078 
162 SAMPL131 
163 THIS 1S THE CONTROL TABLE SAMPL132 
164 SAMPL133 
000250 165 DS oD SAMPL134 
000250 0600610000000078 166 TESTTABL DC FL3*#1%,X*00",A(123),CL8*ALPHA® SAMPL135 
000258 C10307C8C1404040 : 
000260 00000G0000000000 167 oc XL8*0",CLB*BETA® SAMPL136 
006268 C2C5E3C1404064040 
000270 0000C00000000000 168 oc XL8°O*",CLS"DELTA* SAMPL137 
000278 C4C503E3C1404040 
000286 O0COCCCO0G0000000 169 oc XL8*O*,CLE*EPSILON® SAMPL138 
G00288 C5D7E2C9U3060540 
vod2su OCOG000000C00000 170 oc XL8&*0* »CLB*ETA® SAMPL139 
000298 €5&3014040404040 
GOOZAG 00GG0G0000000000 171 bc XL8*0*,CL3*GAMMA® SAMPL140 
OOOZAG C701D4D4C1404040 
000280 0COG0G0000000000 172 oc XL8"°O*®,CiB* IOTA® SAMPL141 
000285 C9K6E3C140404040 
0002C0 6006G860000000000 173 oc XL8*O* gCLB*KAPPA® SAMPL142 
0002C38 D2C107D7C1404040 
0002D0 00001L50A00000000 174% BC FL3*29* ,X*OA" ,AI BEGIN), CLS®*L AMBDAS SAMPL143 
000208 03C0104C2C04C14040 
QGOZEO 0600000000000000 175 DC XL8°O",CLB*MU® SAMPL144 
O00ZES 04E4404040404040 
0002FO 0000000000000000 176 bc XL8°0*,CLE*NU® SAMPL145 
Q002ZF& D5E4404040404040 
000360 0060000000000000 177 bc XL8*0* CLS" OMICRON® SAMPL146 
000308 Deb4C9C3D9D6D540 
000310 0¢G06000000000000 178 oc XL8*O* ,CL3*PHI® SAMPL147 
000318 DI7L8C94040404040 
000320 00000C0000000000 179 be XL8*O* ,CLB*SIGMA® SAMPL148 
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EXAM SAMPLE PRUGRAM : PAGE 


@ @Q@ ® ) 


20C OBJECT CUDE ADDR1 AODR2 STMT SOURCE STATEMENT F 14FEB66 4/11/66 


000326 £2C09C7D4C1404040 
000330 000005G5000000DA 180 oc 
000338 £905E3C0140404040 


FL3°5%,X*05",ACLOOP),CLB"*ZETA® SAMPL149 
181 * SAMPL150 
182 * THIS IS THE CONTROL LIST SAMPL151 
183 * SAMPL152 

000340 03C1D4C204C 14040 184 TESTLIST DC CLE*LAMBDA® 9X" OA* sFL3°29" yA( BEGIN SAMPL153 

000348 0GA00001000000000 

000350 E9SL5E3C 140464040 185 DC 

000358 O05000005000000DA 

000360 £3C8C5E3C1404040 186 oc 

000368 8206002D00000000 

000370 €3C1E4404C404040 187 oc 

000376 8&8€00000000000001 

000380 D309£2E340404040 188 oc 

000388 9F00910100000000 

000390 C1030 70801404040 189 oc 

00039% O6000GO1LOGO0U07TB 


CLE*ZETA*,X*05* »FL3°5",A(LOOP) SAMPL154 


CLB*THETA® 9X*82%eFL 3°45" sA( BEGIN) SAMPL155 


CLB*TAUS 9X* 80" FFL3*O*,A(1) SAMPL156 


CLE*LIST",X*9F* »FL3°465*%,A00) SAMPL157 


CL8*ALPHA' gX*00",FL3°1" ,A(123) SAMPL158 

190 SAMPL159 

191 THESE ARE THE SYMBOLIC REGISTERS SAMPL160 

192 SAMPL161 
oov000 193 EQU SAMPL162 
000001 194 EQu SAMPL163 
o00002 195 EQU SAMPL164 
000003 196 EQU SAMPL165 
000005 197 EQU SAMPL166 
000006 198 EQU SAMPL167 
000007 199 EQu SAMPL168 
00000C equ) 12 SAMPL169 
000000 Equ 13 SAMPLL70 
oo000k EQqU 14 SAMPLI71 
oGo00F EqU) 15 SAMPL172 
SAMPL173 
SAMPL174 
SAMPL175 
SAMPL176 


THIS IS THE FORMAT DEFINITION OF LIST ENTRYS 


000000 DSECT 
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o00000 
000008 
000009 
000000 


00v000 
000000 
000003 
000004 
000008 
000000 
G00000 
0003A0 
0003A0 
0003A0 000001FO 


Q9003A4 0000008000000004 


Q@O003AC 000C0G80 


TABLE 
TNUMBER 
TSWITCH 
TADDRESS 
TNAME 


OS 
DS 
DS 
DS 


CL8 
Cc 
FL3 
F 


THIS IS THE FORMAT DEFINITION GF TABLE ENTRYS 


OSECT 
DS 
DS 

DS 
DS 
END 


FL3 

c 

F 
CL8 
BEGIN 


=A(LISTAREA,16sLISTEND) 
=F*128)4,128° 


SAMPL177 
SAMPL178 
SAMPLi79 
SAMPL180 
SAMPL182 
SAMPL182 
SAMPL183 
SAMPL184 
SAMPL185 
SAMPL186 
SAMPL187 
SAMPL188 
SAMPL189 





@ 


EXAM RELOCATION DICTIGNARY 


@®@ ®D @® 


POS.iD REL.ID FLAGS ADDRESS 


oc GOOLFC 
oc 00020C 
oc 00021C 
oc 000204 
oc 000334 
oc 00034C 
oc 00035C 
oc 00036C 
oc G003A0 
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EXAM 


®@ © ® ® 


SYMBOL 


BEGIN 
ExiT 
HIGHER 
TH60005 
THBOOG5A 
1HBO007 
THBOOOTA 
LADDRESS 
List 
LISTAREA 
LISTEND 
LiSTLGOP 
LNAME 
LNUMGER 
coop 
LSwWITCH 
MORE 
NONE 
NOTFOUND 
NOTKIGHT 
NOTTHERE 


SAMPLR 
SAVEL3 
SEARCH 
SWITCH 
TABLAREA 
TABLE 
TADDRESS 
TESTLAIST 
TESTTABL 
TNAME 
TNUMBER 
TSmiTCH 


LEN 


00004 
00004 
00002 
0eo01 
000c2 
ocaci 
00062 
00004 
00001 
oo0cs 
000cs8 
000c4 
00008 
00003 
00004 
00001 
00604 
00001 
00004 
00004 
000C4 
00001 
00001 
06001 
ooool 
000d. 
00001 
o0coGl 
Q0001 
00001 
0o00Gg1 
o00c1 
00o0cl1 
G00C4 
00004 
00001 
ooocs 
00001 
00064 
000c8 
o00c3 
00008 
0c003 
00001 


VALUE 


000000 
O0007E 
OOOCF4 
000G7B 
oo0o7Cc 
O0O0B9 
Q000bA 
00000C 
000000 
0001FO 
000240 
000038 
000000 
000009 
GOOODA 
000008 
000018 
000080 
OOOOCFA 
90008C 
goccco 
000000 
000001 
0o000c 
000000 
QOOOOE 
QOOO00F 
000002 
000003 
000005 
000006 
000007 
000G00 
o000cs 
Qoooce 
oococc 
000100 
000000 
000004 
000340 
000250 
00c00s8 
000000 
a00co3 


NO STATEMENTS FLAGGED 
351 PRINTED LINES 


DEFN 


0059 
0096 
0130 
0093 
0094 
0108 
0109 
0211 
0207 
0156 
0161 
0082 
0208 
0210 
0123 
0209 
0068 
0116 
0132 
0104 
O1li2 
0193 
0194 
0200 
0201 
0202 
0203 
0195 
0196 
0197 
0198 
0199 
0057 
0114 
0120 
0115 
0138 
0215 
0218 
0184 
0166 
0219 
0216 
0217 


REFERENCES 


0156 
0111 
0125 
0090 
0089 
0105 
0104 
0060 
0067 
0066 
0066 
0113 
0124 
0077 
0128 
0074 
0082 
0069 
0129 
0084 
0070 


oo71 
0063 
0096 
0068 


0128 
0121 
0066 
0082 
0066 
0220 
0065 
0068 
0069 
0083 
0071 
0081 
0085 
0083 
0124 
oo77 
0074 


0158 


IN THIS ASSEMBLY 


CROSS—-REFERENCE 


0174 


0184 0186 0220 


0127 0130 


® 


PAGE 


4/11/66 
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APPENDIX 


The Assembler can be invoked by a problem 
program at execution time through the use 
of the CALL, LINK, XCTL, or ATTACH macro 
instructions. If the XCTL macro instruction 
is used to invoke the Assembler, then no 
user options may be stated. The Assembler 
will use the standard default, as set during 
system generation, for each option. 

If the Assembler is invoked by CALL, LINK, 
or ATTACH, the user may supply: 


1) The Assembler options 


2) =‘The ddnames of the data sets to be used 
during processing 


[symbol ] IEUASM, (optionlist 
[,ddnamelist] ), VL 


EP=IEUASM, 


LINK | 


ATTACH PARAM=(optionlist 


[,ddnamelist] ), VL=1 





EP - specifies the symbolic name of the 
Assembler. The entry point at which 
execution is to begin is determined by 
the control program (from the library 
directory entry). 


PARAM - specifies, as a sublist, address 
parameters to be passed from the prob- 
lem program to the Assembler. The 
first word in the address parameter 
list contains the address of the option 
list. The second word contains the 
address of the ddname list. 


optionlist - specifies the address of a 
variable length list containing the 
options. This address must be written 
even if no option list is provided. 


D. DYNAMIC INVOCATION OF THE ASSEMBLER 


The option list must begin on a 
half-word boundary. The first two 
bytes contain a count of the number of 
bytes in the remainder of the list. 

If no options are specified, the count 
must be zero. The option list is free 
form with each field separated by a 
comma. No blanks or zeros should 
appear in the list. 


ddnamelist - specifies the address of a 


VL 


variable length list containing al- 
ternate ddnames for the data sets used 
during compiler processing. If stand- 
ard ddnames are used then this operand 
may be omitted. 

The ddname list must begin on a 
half-word boundary. The first two 
bytes contain a count of the number of 
bytes in the remainder of the list. 
Each name of less than eight bytes 
must be left-justified and padded with 
blanks. -If an alternate ddname is 
omitted, the standard name will be 
assumed. If the name is omitted 
within the list, the 8-byte entry must 
contain binary zeros. Names can be 
omitted from the end merely by shorten- 
ing the list. The sequence of the 8- 
byte entries in the ddname list is as 
follows: 


Entry Alternate Name 


not applicable 
not applicable 
not applicable 
SYSLIB 

SYSIN 

SYSPRINT 
SYSPUNCH 
SYSUT1 

SYSUT2 

SYSUT3 

SYSGO 


FOU DN HDU S®WNE 


ao 


specifies that the sign bit is to be 
set to 1 in the last word of the 
address parameter list. 
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Access methods 3 
BPAM (basic partitioned) 3 
BSAM (basic sequential) 3 
QSAM (queued sequential) 3 
ASMFC, cataloged procedure for assembly 6 
ASMFCL, cataloged procedure for assembly 
J] and linkage editing 7 
ASMFCLG, cataloged procedure for assembly, 
linkage editing, and execution 8 
Assembler cataloged procedures 
(see cataloged procedures) 
Assembler data sets 
(see data sets) 
Assembler listing 10 
cross reference 13 
diagnostics 14 
external symbol dictionary 10 
relocation dictionary 13 
source and object program 12 
statistical messages 10 
Assembler options 2 
default entry 2 
Assembler portion limitations 20 


Blocking and buffering information 14 
BPAM (Basic Partitioned Access Method) 3 
BSAM (Basic Sequential Access Method) 3 


Cataloged procedures 6 
for assembling (ASMFC) 6 
for assembling and linkage editing 
(ASMFCL) 7 
for assembling, linkage editing, and 
| execution (ASMFCLG) 8 
overriding 9 
COND= parameter 5, 7-9 
Cross reference listing 13 


Data sets 2-5 
SYSGO 2,3 
SYSIN 2,3 
SYSLIB 2, 


3 
SYSPRINT 2,3 
SYSPUNCH 2,3 
SYSUT1, SYSUT2, SYSUT3 2,3 
DCB macro instruction 3 
DD statements 9 
ddnames 3 
Default entry 2 
Defining data set characteristics 3 
Device naming conventions (Table 3) 6 
Diagnostics 
listing 14 
messages 21 
Dictionaries 17 
additional requirements 19 
global 17 
local 17 
Dictionary size and source statement 
complexity 16 
Dynamic Invocation of the Assembler 
(Appendix D) Al 
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INDEX 


END card format 29 

ESD card format 29 

JEXEC statements 9 

External Symbol Dictionary (ESD) 
listing 10 


Global dictionary 
at collection time 18 
at generation time 18 


IEBUPDAT utility program 16 


Job control statements 1 
Job steps 1 


Linkage statements (Figure 5) 17 
Listing, assembler 
(see assembler listing) 
Load module modification - entry point 
restatement 16 
Local dictionary 
at collection time 18 
at generation time 19 


Macro-definition library additions 15 
Macro-definition local definition para- 
meter table (Table 9) 19 
Macro generation and conditional assembly 
limitations 20 
Messages 
diagnostic 21 
statistical 10 


Object deck output 29 
END card 29 
ESD card 29 
RLD card 29 
TESTRAN SYM card 30 
TEXT (TXT) card 29 
Object module linkage 16 
Options, assembler 2 
default entry 2 
Overriding statements in cataloged 
| procedures 9 


PARM field access 15 
[PARM= parameter 2,9 
Procedure (definition) 1 
Program listing 31 
Program termination 15 


QSAM (Queued Sequential Access Method) 3 
Relocation Dictionary listing 13 


Return codes 5 
RLD card format 29 


Sample program listing 31 
Saving and restoring general register 
contents 15 


Index 43 


Severity code 
for diagnostic messages 21-28 
relation to return code 5 
Source and object program 
listing 12 
Source statement complexity 19 
SPACE assembler instruction 10 
Statistical messages 10 
SYSGO 3 
SYSIN 2,3 
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SYSLIB 2, 3 
SYSPRINT 2, 3 ; 
SYSPUNCH 2, 3 
SYSUT1,2,3 2,3 


TESTRAN (SYM) card format 30 

TEXT (TXT) card format 29 

Type designators 10 

Types of ESD entries (Table 4) 10 
Utility data sets 2,3 
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